sHelp
                                     PBR.ACT
     i   2
 claim.txns
 col.ltr.x
 edit.log
 gl.me.revenue
 hosp.interface.edits
 locals
 main
   dem.episode
     dem.epi.auth.cert
       dem.epi.auth.proc
       dem.epi.auth.req.services
       dem.epi.auth.txn.excpt
     dem.epi.ca.wc.obj.compl
     dem.epi.ca.wc.pt.desc
     dem.epi.ca.wc.subj.compl
     dem.epi.ca.wc.treatment
     dem.epi.cd.fld.qrys
     dem.epi.cond
     dem.epi.diag
     dem.epi.first.exam
     dem.epi.ins
       dem.epi.ins.cd.queries
       dem.epi.ins.queries
     dem.epi.ins.order
     dem.epi.occur
     dem.epi.text
     dem.epi.value
   cust.def.queries
   dem.diag
   dem.ins
     dem.ins.cd.queries
     dem.ins.queries
   dem.ins.order
   dem.related.persons
   dem.sig.dates
   recall
   month.end
     me.receivables
       me.ins.receivables
     me.receivables.ser.date
       me.ins.receivables.ser
   receivables
   txns.conv.map
   txns.cur.urns
   txns.edit
   txns.fin
     txns.fin.cd.queries
       txns.fin.cd.mult.queries
     txns.fin.distrib
     txns.fin.pymt.bal
       txns.old.fin.pymt.distrib
     txns.fin.pymt.hist
   txns.ins
     txns.ins.distrib
   txns.stmt
     txns.stmt.distrib
   txns.text.top
     txns.text
 rpt.age.ser.date.x
 rpt.fam.age.ser.date.x
 sp.epi.txns
 sp.txns
 stmt.txns
 tax.rev.rpt
 tax.rev.rpt.summary
 tax.revenue.report
 txns.bad.debt.index

 Ì     i   2
claim.txns
[ctxn.ins.create.date,ctxn.form.mnemonic,ctxn.bill.grp.user,ctxn.sort.key1,ctxn.account,ctxn.so
*(HP2)HPPI[ppiDT,pbc,ppiU,ppiK1,pz,ppiK2]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ctxn.ins.create.date         8 DATE     L                 ppiDT                                                       
 ctxn.form.mnemonic          10 FREE     L  PBR.CLAIM.FORM pbc                                                     
 ctxn.bill.grp.user          10 FREE     L                 ppiU                                                        
 ctxn.sort.key1              15 FREE     L                 ppiK1                                                       
 ctxn.account                44 URN      L  PBR.ACT        pz                                                      
 ctxn.sort.key2              15 FREE     L                 ppiK2                                                       
 ctxn.ins.urn                 5 URN      L                 *(HP2)HPPI[ppiDT,pbc,ppiU,ppiK1,pz,ppiK2]|0                 
 ctxn.payor                  10 FREE     L  PBR.PAYOR      VAL=@PBR.INS.payor[@ins.insurance[@ctxn.ins.urn]]       
 ctxn.printed                 1 YN       L                 *(HP2)HPPI[ppiDT,pbc,ppiU,ppiK1,pz,ppiK2]|1                 
 Ì     i   2
col.ltr.x
[cl.bill.date,cl.bill.group.user,cl.sort.key,cl.account]
?(HP)HPPC[ppsDT,ppsU,ppsK1,pz]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 cl.bill.date                 8 DATE     L                 ppsDT                                                       
 cl.bill.group.user          10 FREE     L                 ppsU                                                        
 cl.sort.key                 15 FREE     L                 ppsK1                                                       
 cl.account                  44 URN      L  PBR.ACT        pz                                                      
 cl.letter                   10 FREE     L  PBR.LETTER     ?(HP)HPPC[ppsDT,ppsU,ppsK1,pz]                          
 cl.print.date                8 DATE     L                 ?(HP)HPPC[ppsDT,ppsU,ppsK1,pz]P|0                           
 Ì     i   2
edit.log
[edit.date,edit.actnum,edit.account,edit.number]
*(HP2)HPZED[pzED,pzR,pz,pzES]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 edit.date                    8 DATE     L                 pzED                                                        
 edit.actnum                 12 FREE     L                 pzR                                                         
 edit.account                44 URN      L  PBR.ACT        pz                                                      
 edit.number                  2 PINT     R                 pzES                                                        
 edit.extra.desc             20 FREE     L                 *(HP2)HPZED[pzED,pzR,pz,pzES]|5                             
 edit.item                   10 FREE     L  PBR.EDIT       *(HP2)HPZED[pzED,pzR,pz,pzES]|0                         
 edit.new.val                30 FREE     L                 *(HP2)HPZED[pzED,pzR,pz,pzES]|4                             
 edit.old.val                30 FREE     L                 *(HP2)HPZED[pzED,pzR,pz,pzES]|3                             
 edit.time                    4 HHMM     L                 *(HP2)HPZED[pzED,pzR,pz,pzES]|1                             
 edit.updated                 1 YN       L                 *(HP2)HPZED[pzED,pzR,pz,pzES]|6                             
 edit.user                   10 FREE     L  MIS.USER       *(HP2)HPZED[pzED,pzR,pz,pzES]|2                         
 Ì     i   2
gl.me.revenue
[gl.number,gl.proc.type,gl.acct,gl.txn.urn,gl.dis.seq]
*(HP2)HPZGL[pzgl,pzglT,pz,pzT,pzTD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 gl.number                   30 FREE     L                 pzgl                                                        
 gl.proc.type                 1 CHOICE   L                 pzglT                                                       
 gl.acct                     44 URN      L  PBR.ACT        pz                                                      
 gl.txn.urn                   5 URN      L                 pzT                                                         
 gl.dis.seq                   5 FREE     L                 pzTD                                                        
 gl.credit                   12 SMONEY   R                 *(HP2)HPZGL[pzgl,pzglT,pz,pzT,pzTD]|1                       
 gl.debit                    12 SMONEY   R                 *(HP2)HPZGL[pzgl,pzglT,pz,pzT,pzTD]|0                       
 gl.dis.urn                   5 URN      L                 *(HP2)HPZGL[pzgl,pzglT,pz,pzT,pzTD]|6                       
 gl.doctor                    8 FREE     L  PBR.DOCTOR     *(HP2)HPZGL[pzgl,pzglT,pz,pzT,pzTD]|2                   
 gl.location                  8 FREE     L  PBR.LOCATION   *(HP2)HPZGL[pzgl,pzglT,pz,pzT,pzTD]|3                   
 gl.negative                  1 FREE     L                 *(HP2)HPZGL[pzgl,pzglT,pz,pzT,pzTD]|7                       
 gl.proc                     10 FREE     L  PBR.PROC       *(HP2)HPZGL[pzgl,pzglT,pz,pzT,pzTD]|4                   
 gl.ser.date                  8 DATE     L                 *(HP2)HPZGL[pzgl,pzglT,pz,pzT,pzTD]|5                       
 Ì     i   2
hosp.interface.edits
[hi.edit.date,hi.edit.actnum,hi.edit.urn,hi.edit.number]
*(HP2)HPZHI[pzhiD,pzR,pz,pzhiX]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 hi.edit.date                 8 DATE     L                 pzhiD                                                       
 hi.edit.actnum              12 INT      R                 pzR                                                         
 hi.edit.urn                 44 URN      L  PBR.ACT        pz                                                      
 hi.edit.number               3 PINT     R                 pzhiX                                                       
 hi.edit.item                15 CHOICE   L                 *(HP2)HPZHI[pzhiD,pzR,pz,pzhiX]|0                           
 hi.edit.new                 30 FREE     L                 *(HP2)HPZHI[pzhiD,pzR,pz,pzhiX]|4                           
 hi.edit.old                 30 FREE     L                 *(HP2)HPZHI[pzhiD,pzR,pz,pzhiX]|3                           
 hi.edit.time                 4 HHMM     L                 *(HP2)HPZHI[pzhiD,pzR,pz,pzhiX]|1                           
 hi.edit.user                10 FREE     L  MIS.USER       *(HP2)HPZHI[pzhiD,pzR,pz,pzhiX]|2                       
 Ì     i   2
locals


 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 address.line1               62 FREE     L                                                                             
 bill.group.user             10 FREE     L                                                                             
 city.state.zip              36 FREE     L                                                                             
 collect1                    10 FREE     L  PBR.COLLECTOR                                                          
 collect2                    10 FREE     L  PBR.COLLECTOR                                                          
 ed.temp.addr                 1 YN       L                                                                             
 edi.recipient                8 FREE     L  PBR.EDI.RECIP                                                          
 exists                       6 FREE     L                                                                             
 famnum                       8 PINT     R                                                                             
 hold                         1 CHOICE   L                                                                             
 hold.days                    3 INT      R                                                                             
 inq.txn.urn                  5 FREE     L                                                                             
 ins.num.txns                 2 INT      R                                                                             
 ins.sort.ins                10 FREE     L  PBR.INS        VAL=@sort.key1#"2*"                                     
 journal                     10 FREE     L  PBR.JOURNAL                                                            
 month                        3 MONTH    L                                                                             
 procedure                   10 FREE     L  PBR.PROC                                                               
 select                       4 FREE     L                                                                             
 sort.key1                   15 FREE     L                                                                             
 sort.key2                   15 FREE     L                                                                             
 sort1                       10 FREE     L                                                                             
 sort2                       10 FREE     L                                                                             
 sort3                       10 FREE     L                                                                             
 sort4                       10 FREE     L                                                                             
 tape.number                  3 INT      R                                                                             
 temp.db.lvl.a               10 FREE     L  PBR.DBA                                                                
 temp.db.lvl.b               10 FREE     L  PBR.DBB                                                                
 temp.doc.grp                10 FREE     L  MIS.DOC.GRP                                                            
 temp.payor                  10 FREE     L  PBR.PAYOR                                                              
 title                       10 FREE     L                                                                             
 user                        10 FREE     L  MIS.USER                                                               
 year                         4 YEAR     L                                                                             
 yes.no                       1 YN       L                                                                             
 Ì   €   i   2
main
[account]
*(HP2)HPZ[pz]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 account                     44 URN      L                 pz                                                          
 ..not.used.1                 0 FREE     L                 *(HP2)HPZ[pz]D["4"]|1                                       
 acct.type                    4 FREE     L  PBR.ACCT.TYPE  *(HP2)HPZ[pz]D|5                                        
 actnum                      12 FREE     L                 *(HP2)HPZ[pz]|0                                             
 actnum.no.id                12 FREE     L                 *(HP2)HPZ[pz]|0                                             
 addr1                       30 FREE     L                 *(HP2)HPZ[pz]D["1"]|0                                       
 addr2                       30 FREE     L                 *(HP2)HPZ[pz]D["1"]|1                                       
 adm.status                   8 FREE     L                 *(HP2)HPZ[pz]D["0"]|6                                       
 alert                       30 FREE     L                 *(HP2)HPZ[pz]D["C"]|0                                       
 appt.age                     7 AGE      R                 *(HP2)HPZ[pz]D["1"]|14                                      
 appt.com.bd                  8 BDATE    L                 *(HP2)HPZ[pz]D["1"]|13                                      
 appt.dob                     8 BDATE    L                 *(HP2)HPZ[pz]D["1"]|12                                      
 appt.sex                     1 CHOICE   L                 *(HP2)HPZ[pz]D["1"]|11                                      
 ar.status                    1 CHOICE   L                 VAL=IF{@PBR.ACT.ptpc.reason "P";"N"}                        
 assigned.doctor              8 FREE     L  PBR.DOCTOR     *(HP2)HPZ[pz]D|10                                       
 assigned.location            8 FREE     L  PBR.LOCATION   *(HP2)HPZ[pz]D|12                                       
 bad.debt.date                8 DATE     L                 *(HP2)HPZ[pz]|15                                            
 bad.debt.txn                 0 FREE     L                 *(HP2)HPZ[pz]|17                                            
 balance                      9 SMONEY   R                 *(HP2)HPZ[pz]|3                                             
 bd.balance                   9 SMONEY   R                 *(HP2)HPZ[pz]|16                                            
 bill.group                  10 FREE     L  PBR.BILLING.GRP*(HP2)HPZ[pz]D|7                                        
 bill.pt                      1 YN       L                 *(HP2)HPZ[pz]D["0"]|4                                       
 billed.balance              15 SMONEY   R                 *(HP2)HPZ[pz]T["C"]|0                                       
 billed.bd.balance           15 SMONEY   R                 *(HP2)HPZ[pz]T["C"]|1                                       
 billed.pt.balance           15 SMONEY   R                 *(HP2)HPZ[pz]T["C"]|2                                       
 bus.phone                   18 FREE     L                 *(HP2)HPZ[pz]D["1"]|6                                       
 cd.screen                   15 FREE     L  MIS.SCREEN     *(HP2)HPZ[pz]D["CD"]|0                                  
 chg.total                    9 SMONEY   R                 *(HP2)HPZ[pz]|5                                             
 city                        20 FREE     L                 *(HP2)HPZ[pz]D["1"]|2                                       
 client                      10 FREE     L                 *(HP2)HPZ[pz]D["1"]|15                                      
 close.date                   8 DATE     L                 *(HP2)HPZ[pz]D|9                                            
 close.type                   1 CHOICE   L                 *(HP2)HPZ[pz]D|18                                           
 cntrct.date                  8 DATE     L                 *(HP2)HPZ[pz]D["7"]|8                                       
 cntrct.mnth.amt             10 MONEY    R                 *(HP2)HPZ[pz]D["7"]|7                                       
 coll.agency                 10 FREE     L  PBR.COL.AG     VAL=IF{"Y"'=@PBR.PARAM.bd.by.txn @p.txn.coll.ag[@p.bad  
                                                           VAL=.debt.txn]}                                             
 collector                   10 FREE     L  PBR.COLLECTOR  VAL=IF{@PBR.ACT.ptpc.reason @PBR.ACT.collector.two;@PB  
                                                           VAL=R.ACT.collector.one}                                    
 collector.one               10 FREE     L  PBR.COLLECTOR  VAL=%PBR.ACT.dem.collector.lookup(^@PBR.COLLECTOR.map.  
                                                           VAL=x#0S,@PBR.ACT.pri.ins.payor,@PBR.ACT.acct.type)         
 collector.two               10 FREE     L  PBR.COLLECTOR  VAL=%PBR.ACT.dem.collector.lookup(^@PBR.COLLECTOR.map2  
                                                           VAL=.x#0S,@PBR.ACT.pri.ins.payor,@PBR.ACT.acct.type)        
 comment                     50 FREE     L                 *(HP2)HPZ[pz]D["C"]|1                                       
 confidential                 1 YN       L                 *(HP2)HPZ[pz]D|22                                           
 dormant.txn                  5 PINT     R                 *(HP2)HPZ[pz]|23                                            
 dunning.msg                 10 FREE     L  PBR.DUN.MSG    *(HP2)HPZ[pz]D["7"]|0                                   
 emp.addr1                   30 FREE     L                 *(HP2)HPZ[pz]D["3"]|5                                       
 emp.addr2                   30 FREE     L                 *(HP2)HPZ[pz]D["3"]|6                                       
 emp.city                    20 FREE     L                 *(HP2)HPZ[pz]D["3"]|7                                       
 emp.name                    30 FREE     L                 *(HP2)HPZ[pz]D["3"]|4                                       
 emp.phone                   18 FREE     L                 *(HP2)HPZ[pz]D["3"]|10                                      
 emp.state                    3 FREE     L                 *(HP2)HPZ[pz]D["3"]|8                                       
 emp.status                  10 FREE     L  MIS.EMP.STATUS *(HP2)HPZ[pz]D["3"]|1                                   
 emp.zip                     10 ZIP.POST L                 *(HP2)HPZ[pz]D["3"]|9                                       
 employee.id                 10 FREE     L                 *(HP2)HPZ[pz]D["3"]|2                                       
 employer                    10 FREE     L  PBR.EMPLOYER   *(HP2)HPZ[pz]D["3"]|3                                   
 family                      44 URN      L                 *(HP2)HPZ[pz]D|20                                           
 first.bch.date               8 DATE     L                 *(HP2)HPZ[pz]|10                                            
 first.chg.ser.date           8 DATE     L                 *(HP2)HPZ[pz]|8                                             
 fqhc                         1 YN       L                 *(HP2)HPZ[pz]D["0"]|0                                       
 guar                        44 URN      L  PBR.GUAR       *(HP2)HPZ[pz]D|25                                       
 guar.addr1                  30 FREE     L                 VAL=IF{"N"=@rp.same.addr[@guar.seq] @rp.addr1[@guar.se      
                                                           VAL=q];@addr1}                                              
 guar.addr2                  30 FREE     L                 VAL=IF{"N"=@rp.same.addr[@guar.seq] @rp.addr2[@guar.se      
                                                           VAL=q];@addr2}                                              
 guar.birthdate              10 BDATE    L                 VAL=IF{@guar.seq @rp.birthdate[@guar.seq];@PBR.MPI.bir      
                                                           VAL=thdate[@patient]}                                       
 guar.city                   20 FREE     L                 VAL=IF{"N"=@rp.same.addr[@guar.seq] @rp.city[@guar.seq      
                                                           VAL=];@city}                                                
 guar.home.phone             25 FREE     L                 VAL=IF{"N"=@rp.same.addr[@guar.seq] @rp.home.phone[@gu      
                                                           VAL=ar.seq];@home.phone}                                    
 guar.marital.status         10 FREE     L                 VAL=IF{@guar.seq @rp.marital.status[@guar.seq];@PBR.AC      
                                                           VAL=T.marital.status[@patient]}                             
 guar.name                   30 FREE     L                 VAL=IF{@guar.seq @rp.name[@guar.seq];@name}                 
 guar.relat                  10 FREE     L  MIS.RELAT      *(HP2)HPZ[pz]D|26                                       
 guar.seq                     2 INT      R                 *(HP2)HPZ[pz]D|4                                            
 guar.sex                     1 FREE     L                 VAL=IF{@guar.seq @rp.sex[@guar.seq];@PBR.MPI.sex[@pati      
                                                           VAL=ent]}                                                   
 guar.ssn                    13 FREE     L                 VAL=IF{@guar.seq @rp.soc.sec[@guar.seq];@PBR.MPI.soc.s      
                                                           VAL=ec[@patient]}                                           
 guar.state                   3 FREE     L                 VAL=IF{"N"=@rp.same.addr[@guar.seq] @rp.state[@guar.se      
                                                           VAL=q];@state}                                              
 guar.zip                    10 ZIP.POST L                 VAL=IF{"N"=@rp.same.addr[@guar.seq] @rp.zip[@guar.seq]      
                                                           VAL=;@zip}                                                  
 hold.date                    8 DATE     L                 *(HP2)HPZ[pz]D["7"]|5                                       
 hold.reason                 10 FREE     L  PBR.HOLD.REASON*(HP2)HPZ[pz]D["7"]|4                                   
 hold.user                   10 FREE     L  MIS.USER       *(HP2)HPZ[pz]D["7"]|6                                   
 home.phone                  18 FREE     L                 *(HP2)HPZ[pz]D["1"]|5                                       
 hosp.adm.date                8 DATE     L                 *(HP2)HPZ[pz]D["4"]|3                                       
 hosp.adm.diagnosis          30 FREE     L                 *(HP2)HPZ[pz]D["6"]|1                                       
 hosp.adm.priority           10 FREE     L  MIS.ADM.PRIORT *(HP2)HPZ[pz]D["4"]|7                                   
 hosp.adm.src                10 FREE     L  MIS.ADM.SOURCE *(HP2)HPZ[pz]D["4"]|8                                   
 hosp.adm.time                4 HHMM     L                 *(HP2)HPZ[pz]D["4"]|4                                       
 hosp.admit.phys             10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]D["5"]|0                                   
 hosp.attend.phys            10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]D["5"]|2                                   
 hosp.bed                     3 FREE     L                 *(HP2)HPZ[pz]D["4"]|6                                       
 hosp.co.admit.phys          10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]D["5"]|1                                   
 hosp.co.attend.phys         10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]D["5"]|3                                   
 hosp.dis.date                8 DATE     L                 *(HP2)HPZ[pz]D["4"]|10                                      
 hosp.dis.diagnosis          30 FREE     L                 *(HP2)HPZ[pz]D["6"]|2                                       
 hosp.dis.disp               10 FREE     L  MIS.DIS        *(HP2)HPZ[pz]D["4"]|12                                  
 hosp.dis.time                4 HHMM     L                 *(HP2)HPZ[pz]D["4"]|11                                      
 hosp.er.phys                10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]D["5"]|4                                   
 hosp.family.phys            10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]D["5"]|6                                   
 hosp.family.phys.name       30 FREE     L                 VAL=@MIS.DOC.name[@PBR.ACT.hosp.family.phys]                
 hosp.family.phys.name.ph    40 FREE     L                 VAL=@MIS.DOC.name[@PBR.ACT.hosp.family.phys]:24T:25L_(      
                                                           VAL=@MIS.DOC.phone[@PBR.ACT.hosp.family.phys,@.facilit      
                                                           VAL=y,@PBR.ACT.hosp.family.phys]:15T:15L)                   
 hosp.inpt.service           10 FREE     L                 *(HP2)HPZ[pz]D["4"]|2                                       
 hosp.mnemonic               10 FREE     L  MIS.FACILITY   *(HP2)HPZ[pz]D["4"]|0                                   
 hosp.newborn.adm.src        10 FREE     L  MIS.NEWBORN    *(HP2)HPZ[pz]D["4"]|9                                   
 hosp.other.phys             10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]D["5"]|5                                   
 hosp.other.phys.name        30 FREE     L                 VAL=@MIS.DOC.name[@PBR.ACT.hosp.other.phys]                 
 hosp.other.phys.name.ph     40 FREE     L                 VAL=@MIS.DOC.name[@PBR.ACT.hosp.other.phys]:24T:25L_(@      
                                                           VAL=MIS.DOC.phone[@PBR.ACT.hosp.other.phys,@.facility,      
                                                           VAL=@PBR.ACT.hosp.other.phys]:15T:15L)                      
 hosp.outpt.locn             10 FREE     L                 *(HP2)HPZ[pz]D["4"]|13                                      
 hosp.reserv.date             8 DATE     L                 *(HP2)HPZ[pz]D["4"]|16                                      
 hosp.room                   10 FREE     L                 *(HP2)HPZ[pz]D["4"]|5                                       
 hosp.ser.date                8 DATE     L                 *(HP2)HPZ[pz]D["4"]|14                                      
 hosp.ser.time                4 HHMM     L                 *(HP2)HPZ[pz]D["4"]|15                                      
 hosp.visit.status            3 FREE     L                 *(HP2)HPZ[pz]D["4"]|17                                      
 id                          44 URN      L  PBR.ACT        VAL=@PBR.ACT.actnum_"  "_@PBR.ACT.name'="  "            
 ind.fee.sch                 10 FREE     L  PBR.FEE.SCH    *(HP2)HPZ[pz]D|19                                       
 initial.ref.doc             10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]D|11                                       
 last.age.date                8 DATE     L                 *(HP2)HPZ[pz]|14                                            
 last.chg.ser.date            8 DATE     L                 *(HP2)HPZ[pz]|9                                             
 last.claim.date              8 DATE     L                 *(HP2)HPZ[pz]|11                                            
 last.col.ltr.date            8 DATE     L                 *(HP2)HPZ[pz]|18                                            
 last.episode                 5 PINT     R                 *(HP2)HPZ[pz]|21                                            
 last.fin.chg.date            8 DATE     L                 *(HP2)HPZ[pz]|20                                            
 last.me.txn                  6 PINT     R                 *(HP2)HPZ[pz]|19                                            
 last.pay.date                8 DATE     L                 *(HP2)HPZ[pz]|6                                             
 last.stmt.date               8 DATE     L                 *(HP2)HPZ[pz]|12                                            
 last.txn                     6 PINT     R                 *(HP2)HPZ[pz]|1                                             
 last.worklist.date           8 DATE     L                 *(HP2)HPZ[pz]|22                                            
 marital.status              10 FREE     L  MIS.MAR.STATUS *(HP2)HPZ[pz]D["1"]|7                                   
 mt.adm.acct.number          12 FREE     L                 *(HP2)HPZ[pz]D["0"]|5                                       
 mt.adm.urn                  30 URN      L                 *(HP2)HPZ[pz]D["0"]|3                                       
 name                        30 NAME     L                 *(HP2)HPZ[pz]D|2                                            
 occupation                  20 FREE     L                 *(HP2)HPZ[pz]D["3"]|0                                       
 old.actnum                  12 FREE     L                 *(HP2)HPZ[pz]D["0"]|7                                       
 open.date                    8 DATE     L                 *(HP2)HPZ[pz]D|8                                            
 open.time                    4 FREE     L                 *(HP2)HPZ[pz]D|16                                           
 open.type                    3 CHOICE   L                 *(HP2)HPZ[pz]D|17                                           
 open.user                   10 FREE     L  MIS.USER       *(HP2)HPZ[pz]D|15                                       
 patient                     30 URN      L  PBR.MPI        *(HP2)HPZ[pz]D|0                                        
 patnum                      12 FREE     L                 *(HP2)HPZ[pz]D|1                                            
 pbr.status                   2 FREE     L                 *(HP2)HPZ[pz]|2                                             
 pcp                         10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]D|23                                       
 pcp.ins                     10 FREE     L  PBR.INS        *(HP2)HPZ[pz]D|24                                       
 pri.ins.payor               10 FREE     L  PBR.PAYOR      VAL=@PBR.INS.payor[@primary.ins]                        
 primary.ins                 10 FREE     L  PBR.INS        VAL=IF{@PBR.ACT.ins.mnemonic[1];@PBR.PARAM.self.pay.in  
                                                           VAL=s;"SP"}                                                 
 primary.payor               10 FREE     L  PBR.PAYOR      VAL=IF{@PBR.PAYOR.combine.with.payor[@pri.ins.payor];@  
                                                           VAL=pri.ins.payor}                                          
 print.cd.screen             30 FREE     L                 *(HP2)HPZ[pz]D["CD"]|1                                      
 print.cd.screen.verbatim    30 FREE     L                 *(HP2)HPZ[pz]D["CD"]|2                                      
 pt.balance                   9 SMONEY   R                 *(HP2)HPZ[pz]|4                                             
 pt.seq                       2 PINT     R                 *(HP2)HPZ[pz]D|21                                           
 pt.temp.addr1               30 FREE     L                 *(HP2)HPZ[pz]D["2"]|0                                       
 pt.temp.addr2               30 FREE     L                 *(HP2)HPZ[pz]D["2"]|1                                       
 pt.temp.bus.phone           18 FREE     L                 *(HP2)HPZ[pz]D["2"]|6                                       
 pt.temp.city                20 FREE     L                 *(HP2)HPZ[pz]D["2"]|2                                       
 pt.temp.home.phone          18 FREE     L                 *(HP2)HPZ[pz]D["2"]|5                                       
 pt.temp.state                3 FREE     L                 *(HP2)HPZ[pz]D["2"]|3                                       
 pt.temp.zip                 10 ZIP.POST L                 *(HP2)HPZ[pz]D["2"]|4                                       
 ptpc.date                    8 DATE     L                 *(HP2)HPZ[pz]D["7"]|2                                       
 ptpc.reason                 10 FREE     L  PBR.PRECOLLECT *(HP2)HPZ[pz]D["7"]|1                                   
 ptpc.user                   10 FREE     L  MIS.USER       *(HP2)HPZ[pz]D["7"]|3                                   
 sched.alert                 50 FREE     L                 *(HP2)HPZ[pz]D["C"]|3                                       
 sig.info.release             1 CHOICE   L                 *(HP2)HPZ[pz]D["1"]|8                                       
 sliding.fee                  3 PINT     R                 VAL=IF{@cd.response[@PBR.PARAM.slid.fee.ben.query]%3;@      
                                                           VAL=sp.benefit.plan%3}                                      
 sliding.fee.in.use           1 YN       L                 *(HP2)HPZ[pz]D["0"]|2                                       
 sliding.fee.slash            3 PINT     R                 VAL=IF{@t.cd.response[@PBR.PARAM.slid.fee.ben.query]%3      
                                                           VAL=;@t.sp.benefit.plan%3}                                  
 sort.name                   30 NAME     L                 *(HP2)HPZ[pz]D|3                                            
 sp.benefit.plan             20 FREE     L                 *(HP2)HPZ[pz]D["0"]|1                                       
 starting.fin.txn             5 PINT     R                 *(HP2)HPZ[pz]|13                                            
 state                        3 FREE     L                 *(HP2)HPZ[pz]D["1"]|3                                       
 stmt.msg.txt                50 FREE     L                 *(HP2)HPZ[pz]D["C"]|2                                       
 suppress.aging.msg           1 YN       L                 *(HP2)HPZ[pz]D|14                                           
 suppress.stmt                1 YN       L                 *(HP2)HPZ[pz]D|13                                           
 vip                         10 FREE     L  PBR.VIP        *(HP2)HPZ[pz]D["1"]|9                                   
 visit.reason                50 FREE     L                 *(HP2)HPZ[pz]D["6"]|0                                       
 visit.type                  10 FREE     L  PBR.VISIT.TYPE *(HP2)HPZ[pz]D|6                                        
 zero.date                    8 DATE     L                 *(HP2)HPZ[pz]|7                                             
 zip                         10 ZIP.POST L                 *(HP2)HPZ[pz]D["1"]|4                                       
 Ì   €   i   2
dem.episode
[account,  epi.seq]
*(HP2)HPZ[pz]E[pze]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.seq                      5 URN      L                 pze                                                         
 epi.active                   1 YN       L                 *(HP2)HPZ[pz]E[pze]|0                                       
 epi.begin.date               8 DATE     L                 *(HP2)HPZ[pz]E[pze]|2                                       
 epi.bill.pt                  1 YN       L                 *(HP2)HPZ[pz]E[pze]|10                                      
 epi.cd.prt.scrn             30 FREE     L                 *(HP2)HPZ[pz]E[pze]C|1                                      
 epi.cd.prt.scrn.verb        30 FREE     L                 *(HP2)HPZ[pz]E[pze]C|2                                      
 epi.cd.screen               15 FREE     L  MIS.SCREEN     *(HP2)HPZ[pz]E[pze]C|0                                  
 epi.client                  12 FREE     L  PBR.CLNT       *(HP2)HPZ[pz]E[pze]|21                                  
 epi.client.comment          50 FREE     L                 *(HP2)HPZ[pz]E[pze]CL|0                                     
 epi.consist.explain         62 FREE     L                 *(HP2)HPZ[pz]E[pze]W["E"]|1                                 
 epi.consist.w.pt             1 YN       L                 *(HP2)HPZ[pz]E[pze]W|1                                      
 epi.desc.text.editor         0 FREE     L                 VAL=%Z.text.create(^@Root(@t.dem.epi.text[account,epi.      
                                                           VAL=seq]),{15,48,4,40})^/TH,%Z.text.disp(/TH),%Z.text.      
                                                           VAL=close.up(/TH),""^/TH                                    
 epi.desc.text.editor.ppr     0 FREE     L                 VAL=%Z.text.create(^@Root(@t.dem.epi.text[account,epi.      
                                                           VAL=seq]),{20,48,4,40})^/TH,%Z.text.disp(/TH),%Z.text.      
                                                           VAL=close.up(/TH),""^/TH                                    
 epi.desc.text.editor2        0 FREE     L                 VAL=%Z.text.create(^@Root(@t.dem.epi.text[account,epi.      
                                                           VAL=seq]),{19,48,4,40})^/TH,%Z.text.disp(/TH),%Z.text.      
                                                           VAL=close.up(/TH),""^/TH                                    
 epi.dt.last.work             8 DATE     L                 *(HP2)HPZ[pz]E[pze]|7                                       
 epi.dt.no.work.from          8 DATE     L                 *(HP2)HPZ[pz]E[pze]|5                                       
 epi.dt.no.work.thru          8 DATE     L                 *(HP2)HPZ[pz]E[pze]|6                                       
 epi.dt.similar.ill           8 DATE     L                 *(HP2)HPZ[pz]E[pze]|4                                       
 epi.edit                     1 YN       L                 *(HP2)HPZ[pz]E[pze]|8                                       
 epi.emergency                1 YN       L                 *(HP2)HPZ[pz]E[pze]|9                                       
 epi.emp.addr1               30 FREE     L                 *(HP2)HPZ[pz]E[pze]E|3                                      
 epi.emp.addr2               30 FREE     L                 *(HP2)HPZ[pz]E[pze]E|4                                      
 epi.emp.city                20 FREE     L                 *(HP2)HPZ[pz]E[pze]E|5                                      
 epi.emp.employee.id         10 FREE     L                 *(HP2)HPZ[pz]E[pze]E|10                                     
 epi.emp.employer            10 FREE     L  PBR.EMPLOYER   *(HP2)HPZ[pz]E[pze]E|1                                  
 epi.emp.name                30 FREE     L                 *(HP2)HPZ[pz]E[pze]E|2                                      
 epi.emp.occupation          30 FREE     L                 *(HP2)HPZ[pz]E[pze]E|0                                      
 epi.emp.phone               18 FREE     L                 *(HP2)HPZ[pz]E[pze]E|8                                      
 epi.emp.state                3 FREE     L                 *(HP2)HPZ[pz]E[pze]E|6                                      
 epi.emp.status              10 FREE     L  MIS.EMP.STATUS *(HP2)HPZ[pz]E[pze]E|9                                  
 epi.emp.zip                 10 FREE     L                 *(HP2)HPZ[pz]E[pze]E|7                                      
 epi.end.date                 8 DATE     L                 *(HP2)HPZ[pz]E[pze]|3                                       
 epi.fqhc                     1 YN       L                 *(HP2)HPZ[pz]E[pze]|17                                      
 epi.furth.treat             31 FREE     L                 *(HP2)HPZ[pz]E[pze]W["T"]|1                                 
 epi.hold.reason             10 FREE     L  PBR.HOLD.REASON*(HP2)HPZ[pz]E[pze]|20                                  
 epi.hosp                    10 FREE     L  MIS.FACILITY   *(HP2)HPZ[pz]E[pze]H|0                                  
 epi.hosp.adm.date            8 DATE     L                 *(HP2)HPZ[pz]E[pze]H|1                                      
 epi.hosp.adm.priority       10 FREE     L  MIS.ADM.PRIORT *(HP2)HPZ[pz]E[pze]H|10                                 
 epi.hosp.adm.source         10 FREE     L  MIS.ADM.SOURCE *(HP2)HPZ[pz]E[pze]H|5                                  
 epi.hosp.adm.time            4 HHMM     L                 *(HP2)HPZ[pz]E[pze]H|2                                      
 epi.hosp.attend.phys        10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]E[pze]H|11                                 
 epi.hosp.dis.date            8 DATE     L                 *(HP2)HPZ[pz]E[pze]H|3                                      
 epi.hosp.dis.disp           10 FREE     L  MIS.DIS        *(HP2)HPZ[pz]E[pze]H|6                                  
 epi.hosp.dis.time            4 HHMM     L                 *(HP2)HPZ[pz]E[pze]H|4                                      
 epi.hosp.outpt.locn         10 FREE     L                 *(HP2)HPZ[pz]E[pze]H|9                                      
 epi.hosp.ser.date            8 DATE     L                 *(HP2)HPZ[pz]E[pze]H|7                                      
 epi.hosp.ser.time            4 HHMM     L                 *(HP2)HPZ[pz]E[pze]H|8                                      
 epi.impede.recov             1 YN       L                 *(HP2)HPZ[pz]E[pze]W|2                                      
 epi.ins.detail               1 YN       L                 *(HP2)HPZ[pz]E[pze]|11                                      
 epi.ins.urn                  5 PINT     R                 *(HP2)HPZ[pz]E[pze]W|6                                      
 epi.mt.actnum               12 FREE     L                 *(HP2)HPZ[pz]E[pze]|12                                      
 epi.mt.adm.urn              12 FREE     L                 *(HP2)HPZ[pz]E[pze]|13                                      
 epi.mt.auth.new.acct        44 URN      L  PBR.ACT        *(HP2)HPZ[pz]E[pze]|23                                  
 epi.mt.auth.new.epi.seq      5 URN      L                 *(HP2)HPZ[pz]E[pze]|24                                      
 epi.mt.auth.urn             10 URN      L                 *(HP2)HPZ[pz]E[pze]|22                                      
 epi.mt.unit.num             12 FREE     L                 *(HP2)HPZ[pz]E[pze]|16                                      
 epi.mt.visit.type           10 FREE     L                 *(HP2)HPZ[pz]E[pze]|14                                      
 epi.patient                 30 URN      L                 *(HP2)HPZ[pz]E[pze]|15                                      
 epi.pcp                     10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]E[pze]|18                                  
 epi.pcp.ins                 10 FREE     L  PBR.INS        *(HP2)HPZ[pz]E[pze]|19                                  
 epi.prev.treatment           1 YN       L                 *(HP2)HPZ[pz]E[pze]W|0                                      
 epi.recov.explain           62 FREE     L                 *(HP2)HPZ[pz]E[pze]W["E"]|2                                 
 epi.sliding.fee             10 PINT     R                 VAL=IF{@epi.cd.response[@PBR.PARAM.slid.fee.ben.query]      
                                                           VAL=%3;@epi.sp.benefit.plan%3}                              
 epi.sliding.fee.in.use       1 YN       L                 *(HP2)HPZ[pz]E[pze]S|0                                      
 epi.sliding.fee.slash       10 PINT     R                 VAL=IF{@t.epi.cd.response[@PBR.PARAM.slid.fee.ben.quer      
                                                           VAL=y]%3;@epi.sp.benefit.plan%3}                            
 epi.sp.benefit.plan         20 FREE     L                 *(HP2)HPZ[pz]E[pze]S|1                                      
 epi.treat.est.dur           14 FREE     L                 *(HP2)HPZ[pz]E[pze]W["T"]|2                                 
 epi.type                    10 FREE     L  PBR.EPISODE    *(HP2)HPZ[pz]E[pze]|1                                   
 epi.ub.tob                   3 FREE     L                 *(HP2)HPZ[pz]E[pze]U|0                                      
 epi.wc.doctor                8 FREE     L  PBR.DOCTOR     *(HP2)HPZ[pz]E[pze]W|7                                  
 epi.work.mod.ret            10 DATE     L                 *(HP2)HPZ[pz]E[pze]W|5                                      
 epi.work.reg.ret            10 DATE     L                 *(HP2)HPZ[pz]E[pze]W|4                                      
 epi.work.stat.restrict      40 FREE     L                 *(HP2)HPZ[pz]E[pze]W["T"]|3                                 
 epi.work.usual               1 YN       L                 *(HP2)HPZ[pz]E[pze]W|3                                      
 epi.xray.result             45 FREE     L                 *(HP2)HPZ[pz]E[pze]W["T"]|0                                 
 inj.address                 30 FREE     L                 *(HP2)HPZ[pz]E[pze]J|3                                      
 inj.city                    30 FREE     L                 *(HP2)HPZ[pz]E[pze]J|4                                      
 inj.county                  10 FREE     L  MIS.CNTY       *(HP2)HPZ[pz]E[pze]J|5                                  
 inj.date                     8 DATE     L                 *(HP2)HPZ[pz]E[pze]J|1                                      
 inj.state                    3 FREE     L                 *(HP2)HPZ[pz]E[pze]J|6                                      
 inj.time                     4 HHMM     L                 *(HP2)HPZ[pz]E[pze]J|2                                      
 inj.type                    10 FREE     L  PBR.INJURY     *(HP2)HPZ[pz]E[pze]J|0                                  
 inj.zip                     10 ZIP.POST L                 *(HP2)HPZ[pz]E[pze]J|7                                      
 Ì   €   i   2
dem.epi.auth.cert
[account,epi.seq,  epi.auth.urn]
*(HP2)HPZ[pz]E[pze]A[pzeAU]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.auth.urn                 2 PINT     R                 pzeAU                                                       
 epi.auth.benefit.opt         6 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A["A"]|2                         
 epi.auth.comment            20 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]|5                               
 epi.auth.data.no            18 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A|0                              
 epi.auth.db.lvl.b           10 FREE     L  PBR.DBB        *(HP2)HPZ[pz]E[pze]A[pzeAU]|1                           
 epi.auth.diag.code           6 FREE     L  PBR.DIAGNOSIS  *(HP2)HPZ[pz]E[pze]A[pzeAU]A|1                          
 epi.auth.diag.desc          30 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A|2                              
 epi.auth.doctor              8 FREE     L  PBR.DOCTOR     *(HP2)HPZ[pz]E[pze]A[pzeAU]|2                           
 epi.auth.eff.date            8 DATE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A|7                              
 epi.auth.exp.date            8 DATE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A|8                              
 epi.auth.hp.code             4 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A["A"]|1                         
 epi.auth.ins                10 FREE     L  PBR.INS        *(HP2)HPZ[pz]E[pze]A[pzeAU]|0                           
 epi.auth.ipa.reimb.amt       9 MONEY    R                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A|10                             
 epi.auth.last.user          10 FREE     L  MIS.USER       *(HP2)HPZ[pz]E[pze]A[pzeAU]A|12                         
 epi.auth.number             20 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]|3                               
 epi.auth.phy.ind             1 CHOICE   L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]|4                               
 epi.auth.process.stat        8 CHOICE   L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A|5                              
 epi.auth.process.tried.q     1 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A|11                             
 epi.auth.ref.provider       10 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A|9                              
 epi.auth.req.date            8 DATE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]R["A"]|0                         
 epi.auth.req.diag.code       6 FREE     L  PBR.DIAGNOSIS  *(HP2)HPZ[pz]E[pze]A[pzeAU]R|2                          
 epi.auth.req.diag.desc      30 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]R|3                              
 epi.auth.req.inq             1 YN       L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]|6                               
 epi.auth.req.last.user      10 FREE     L  MIS.USER       *(HP2)HPZ[pz]E[pze]A[pzeAU]R|9                          
 epi.auth.req.number         18 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]R|7                              
 epi.auth.req.pros.tried.q    1 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]R|8                              
 epi.auth.req.reqd.prov      10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]E[pze]A[pzeAU]R|6                          
 epi.auth.req.reqg.prov      10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]E[pze]A[pzeAU]R|5                          
 epi.auth.req.stat            8 CHOICE   L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]R|0                              
 epi.auth.req.stat.date       8 DATE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]R|1                              
 epi.auth.req.units           3 INT      R                 *(HP2)HPZ[pz]E[pze]A[pzeAU]R|4                              
 epi.auth.request.date        8 DATE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A["A"]|0                         
 epi.auth.status              9 CHOICE   L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A|4                              
 epi.auth.status.date         8 DATE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A|6                              
 epi.auth.status.out          9 FREE     L                 VAL=IF(@ins.auth.status;@ins.auth.process.status}           
 epi.auth.units               3 PINT     R                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A|3                              
 Ì   €   i   2
dem.epi.auth.proc
[account,epi.seq,epi.auth.urn,  epi.auth.proc.seq.no]
*(HP2)HPZ[pz]E[pze]A[pzeAU]A["P",pzeAP]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.auth.proc.seq.no         2 PINT     R                 pzeAP                                                       
 epi.auth.proc               10 FREE     L  PBR.PROC       *(HP2)HPZ[pz]E[pze]A[pzeAU]A["P",pzeAP]|0               
 epi.auth.proc.amt           10 MONEY    R                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A["P",pzeAP]|1                   
 epi.auth.proc.copay         10 MONEY    R                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A["P",pzeAP]|3                   
 epi.auth.proc.mod            2 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A["P",pzeAP]A|0                  
 epi.auth.proc.units          4 PINT     R                 *(HP2)HPZ[pz]E[pze]A[pzeAU]A["P",pzeAP]|2                   
 Ì   €   i   2
dem.epi.auth.req.services
[account,epi.seq,epi.auth.urn,  epi.auth.req.ser.seq.no]
*(HP2)HPZ[pz]E[pze]A[pzeAU]R["S",pzeRS]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.auth.req.ser.seq.no      2 PINT     R                 pzeRS                                                       
 epi.auth.req.fin.resp       10 CHOICE   L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]R["S",pzeRS]|0                   
 epi.auth.req.proc.code      10 FREE     L  PBR.PROC       *(HP2)HPZ[pz]E[pze]A[pzeAU]R["S",pzeRS]|1               
 epi.auth.req.proc.desc      30 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]R["S",pzeRS]|3                   
 epi.auth.req.quantity        4 PINT     R                 *(HP2)HPZ[pz]E[pze]A[pzeAU]R["S",pzeRS]|4                   
 epi.auth.req.use.cpt         1 YN       L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]R["S",pzeRS]|2                   
 Ì   €   i   2
dem.epi.auth.txn.excpt
[account,epi.seq,epi.auth.urn,  epi.auth.txn]
*(HP2)HPZ[pz]E[pze]A[pzeAU]T[pzTA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.auth.txn                 5 URN      L                 pzTA                                                        
 epi.auth.edit                1 YN       L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]T[pzTA]|0                        
 epi.auth.txn.auth.num       20 FREE     L                 *(HP2)HPZ[pz]E[pze]A[pzeAU]T[pzTA]|1                        
 Ì   €   i   2
dem.epi.ca.wc.obj.compl
[account,epi.seq,  epi.obj.compl.urn]
*(HP2)HPZ[pz]E[pze]W["O",pzeO]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.obj.compl.urn            1 URN      L                 pzeO                                                        
 epi.obj.compl.line          76 FREE     L                 *(HP2)HPZ[pz]E[pze]W["O",pzeO]                              
 Ì   €   i   2
dem.epi.ca.wc.pt.desc
[account,epi.seq,  epi.pt.desc.urn]
*(HP2)HPZ[pz]E[pze]W["P",pzeP]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.pt.desc.urn              1 URN      L                 pzeP                                                        
 epi.pt.desc.line            75 FREE     L                 *(HP2)HPZ[pz]E[pze]W["P",pzeP]                              
 Ì   €   i   2
dem.epi.ca.wc.subj.compl
[account,epi.seq,  epi.sub.compl.urn]
*(HP2)HPZ[pz]E[pze]W["S",pzeS]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.sub.compl.urn            1 URN      L                 pzeS                                                        
 epi.sub.compl.line          76 FREE     L                 *(HP2)HPZ[pz]E[pze]W["S",pzeS]                              
 Ì   €   i   2
dem.epi.ca.wc.treatment
[account,epi.seq,  epi.treat.urn]
*(HP2)HPZ[pz]E[pze]W["TM",pzeT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.treat.urn                1 URN      L                 pzeT                                                        
 epi.treat.line              76 FREE     L                 *(HP2)HPZ[pz]E[pze]W["TM",pzeT]                             
 Ì   €   i   2
dem.epi.cd.fld.qrys
[account,epi.seq,  epi.cd.query]
*(HP2)HPZ[pz]E[pze]C[ggv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.cd.query                10 FREE     L  MIS.QUERY      ggv                                                     
 epi.cd.response             75 QRY.RESP L                 *(HP2)HPZ[pz]E[pze]C[ggv]|0                                 
 Ì   €   i   2
dem.epi.cond
[account,epi.seq,  epi.con.seq]
*(HP2)HPZ[pz]E[pze]CC[pzeC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.con.seq                  2 PINT     R                 pzeC                                                        
 epi.con                     10 FREE     L  MIS.COND       *(HP2)HPZ[pz]E[pze]CC[pzeC]|0                           
 Ì   €   i   2
dem.epi.diag
[account,epi.seq,  epi.diag.seq.no]
*(HP2)HPZ[pz]E[pze]DX[naxSQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.diag.seq.no              1 URN      L                 naxSQ                                                       
 epi.diag.code                6 FREE     L  PBR.DIAGNOSIS  *(HP2)HPZ[pz]E[pze]DX[naxSQ]|0                          
 Ì   €   i   2
dem.epi.first.exam
[account,epi.seq,  epi.first.exam.doc]
*(HP2)HPZ[pz]E[pze]F[pdd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.first.exam.doc           8 FREE     L  PBR.DOCTOR     pdd                                                     
 epi.dt.first.exam           10 DATE     L                 *(HP2)HPZ[pz]E[pze]F[pdd]|0                                 
 epi.tm.first.exam            4 HHMM     L                 *(HP2)HPZ[pz]E[pze]F[pdd]|1                                 
 Ì   €   i   2
dem.epi.ins
[account,epi.seq,  epi.ins]
*(HP2)HPZ[pz]E[pze]I[pdi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.ins                     10 FREE     L  PBR.INS        pdi                                                     
 epi.ins.addr1               30 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]1|1                                
 epi.ins.addr2               30 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]1|2                                
 epi.ins.attn                30 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]1|8                                
 epi.ins.champus.branch      11 CHOICE   L                 *(HP2)HPZ[pz]E[pze]I[pdi]|12                                
 epi.ins.champus.grade        2 CHOICE   L                 *(HP2)HPZ[pz]E[pze]I[pdi]|17                                
 epi.ins.champus.status       1 CHOICE   L                 *(HP2)HPZ[pz]E[pze]I[pdi]|11                                
 epi.ins.city                20 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]1|4                                
 epi.ins.comment             50 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]C|0                                
 epi.ins.deductible           9 SMONEY   R                 *(HP2)HPZ[pz]E[pze]I[pdi]|13                                
 epi.ins.edit                 1 YN       L                 *(HP2)HPZ[pz]E[pze]I[pdi]|14                                
 epi.ins.eff.date             8 DATE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]|6                                 
 epi.ins.elig.last.user      10 FREE     L  MIS.USER       *(HP2)HPZ[pz]E[pze]I[pdi]L|3                            
 epi.ins.elig.prcs.tried.q    1 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]L|2                                
 epi.ins.elig.status          8 CHOICE   L                 *(HP2)HPZ[pz]E[pze]I[pdi]L|0                                
 epi.ins.elig.status.date     8 DATE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]L|1                                
 epi.ins.exp.date             8 DATE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]|7                                 
 epi.ins.group.number        30 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]|4                                 
 epi.ins.grp.pln.name        30 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]|8                                 
 epi.ins.mt.subscriber       35 URN      L  MRI.SUBSCRIBER *(HP2)HPZ[pz]E[pze]I[pdi]|18                            
 epi.ins.name                30 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]1|0                                
 epi.ins.paper.only           1 YN       L                 *(HP2)HPZ[pz]E[pze]I[pdi]|16                                
 epi.ins.person               2 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]|2                                 
 epi.ins.phone               20 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]1|7                                
 epi.ins.policy.number       30 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]|3                                 
 epi.ins.pymt.auth            1 YN       L                 *(HP2)HPZ[pz]E[pze]I[pdi]|10                                
 epi.ins.state                3 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]1|5                                
 epi.ins.type                10 FREE     L  PBR.INS.TYPE   *(HP2)HPZ[pz]E[pze]I[pdi]|15                            
 epi.ins.zip                 10 ZIP.POST L                 *(HP2)HPZ[pz]E[pze]I[pdi]1|6                                
 Ì   €   i   2
dem.epi.ins.cd.queries
[account,epi.seq,epi.ins,  epi.ins.cd.query]
*(HP2)HPZ[pz]E[pze]I[pdi]CD[ggv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.ins.cd.query            10 FREE     L                 ggv                                                         
 epi.ins.cd.response         75 QRY.RESP L                 *(HP2)HPZ[pz]E[pze]I[pdi]CD[ggv]|0                          
 Ì   €   i   2
dem.epi.ins.queries
[account,epi.seq,epi.ins,  epi.query.no]
*(HP2)HPZ[pz]E[pze]I[pdi]Q[pzeIQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.query.no                 2 PINT     R                 pzeIQ                                                       
 epi.query.info              75 QRY.RESP L                 *(HP2)HPZ[pz]E[pze]I[pdi]Q[pzeIQ]|0                         
 epi.query.mnemonic          10 FREE     L  MIS.QUERY      *(HP2)HPZ[pz]E[pze]I[pdi]Q[pzeIQ]|1                     
 epi.query.screen            60 FREE     L                 VAL=@Color.use(@Z.color.labels)_@MIS.QUERY.text[@epi.q      
                                                           VAL=uery.mnemonic[account,epi.ins,epi.query.no]]:64L_@      
                                                           VAL=Color.use(@Z.color.data)                                
 epi.query.text              40 FREE     L                 *(HP2)HPZ[pz]E[pze]I[pdi]Q[pzeIQ]|2                         
 Ì   €   i   2
dem.epi.ins.order
[account,epi.seq,  epi.ins.seq.no]
*(HP2)HPZ[pz]E[pze]IO[pzeIO]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.ins.seq.no               2 URN      L                 pzeIO                                                       
 epi.ins.bill                 1 CHOICE   L                 *(HP2)HPZ[pz]E[pze]IO[pzeIO]|1                              
 epi.ins.mnemonic            10 FREE     L  PBR.INS        *(HP2)HPZ[pz]E[pze]IO[pzeIO]|0                          
 Ì   €   i   2
dem.epi.occur
[account,epi.seq,  epi.occur.seq]
*(HP2)HPZ[pz]E[pze]O[pzeOC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.occur.seq                2 PINT     R                 pzeOC                                                       
 epi.occur.code              10 FREE     L  MIS.ACCID.TYPE *(HP2)HPZ[pz]E[pze]O[pzeOC]|0                           
 epi.occur.date               8 DATE     L                 *(HP2)HPZ[pz]E[pze]O[pzeOC]|1                               
 epi.occur.thru.date          8 DATE     L                 *(HP2)HPZ[pz]E[pze]O[pzeOC]|3                               
 epi.occur.time               4 HHMM     L                 *(HP2)HPZ[pz]E[pze]O[pzeOC]|2                               
 Ì   €   i   2
dem.epi.text
[account,epi.seq,  epi.txt.urn]
*(HP2)HPZ[pz]E[pze]L[pzeT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.txt.urn                  3 PINT     R                 pzeT                                                        
 epi.txt.line                40 TEXT     L                 *(HP2)HPZ[pz]E[pze]L[pzeT]                                  
 Ì   €   i   2
dem.epi.value
[account,epi.seq,  epi.val.seq]
*(HP2)HPZ[pz]E[pze]V[pzeV]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 epi.val.seq                  2 PINT     R                 pzeV                                                        
 epi.val.amt                  9 FREE     L                 *(HP2)HPZ[pz]E[pze]V[pzeV]|1                                
 epi.val.code                10 FREE     L  PBR.VAL.CODES  *(HP2)HPZ[pz]E[pze]V[pzeV]|0                            
 Ì   €   i   2
cust.def.queries
[account,  cd.query]
*(HP2)HPZ[pz]D["CD",ggv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 cd.query                    10 FREE     L  MIS.QUERY      ggv                                                     
 cd.response                 75 QRY.RESP L                 *(HP2)HPZ[pz]D["CD",ggv]|0                                  
 Ì   €   i   2
dem.diag
[account,  diag.seq.no]
*(HP2)HPZ[pz]D["DX",naxSQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 diag.seq.no                  1 URN      L                 naxSQ                                                       
 diag.code                    6 FREE     L  PBR.DIAGNOSIS  *(HP2)HPZ[pz]D["DX",naxSQ]|0                            
 Ì   €   i   2
dem.ins
[account,  ins]
*(HP2)HPZ[pz]D["I",pdi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ins                         10 FREE     L  PBR.INS        pdi                                                     
 ..not.used                   0 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]|9                                   
 ..old.ins.group.name        30 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]|5                                   
 ins.addr1                   30 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]1|1                                  
 ins.addr2                   30 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]1|2                                  
 ins.addr3                   30 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]1|3                                  
 ins.attn                    30 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]1|8                                  
 ins.bill                     1 CHOICE   L                 *(HP2)HPZ[pz]D["I",pdi]|1                                   
 ins.champus.branch          11 CHOICE   L                 *(HP2)HPZ[pz]D["I",pdi]|12                                  
 ins.champus.grade            2 CHOICE   L                 *(HP2)HPZ[pz]D["I",pdi]|17                                  
 ins.champus.status           1 CHOICE   L                 *(HP2)HPZ[pz]D["I",pdi]|11                                  
 ins.city                    20 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]1|4                                  
 ins.comment                 50 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]C|0                                  
 ins.deductible               9 SMONEY   R                 *(HP2)HPZ[pz]D["I",pdi]|13                                  
 ins.edit                     1 YN       L                 *(HP2)HPZ[pz]D["I",pdi]|14                                  
 ins.eff.date                 8 DATE     L                 *(HP2)HPZ[pz]D["I",pdi]|6                                   
 ins.elig.ben.plan           20 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]L|4                                  
 ins.elig.last.user          10 FREE     L  MIS.USER       *(HP2)HPZ[pz]D["I",pdi]L|3                              
 ins.elig.process.tried.q     1 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]L|2                                  
 ins.elig.status              8 CHOICE   L                 *(HP2)HPZ[pz]D["I",pdi]L|0                                  
 ins.elig.status.date         8 DATE     L                 *(HP2)HPZ[pz]D["I",pdi]L|1                                  
 ins.exp.date                 8 DATE     L                 *(HP2)HPZ[pz]D["I",pdi]|7                                   
 ins.group.number            30 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]|4                                   
 ins.grp.pln.name            30 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]|8                                   
 ins.last.episode             5 PINT     R                 *(HP2)HPZ[pz]D["I",pdi]|0                                   
 ins.mt.subscriber           35 URN      L  MRI.SUBSCRIBER *(HP2)HPZ[pz]D["I",pdi]|18                              
 ins.name                    30 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]1|0                                  
 ins.paper.only               1 YN       L                 *(HP2)HPZ[pz]D["I",pdi]|16                                  
 ins.person                   2 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]|2                                   
 ins.phone                   20 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]1|7                                  
 ins.policy.number           30 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]|3                                   
 ins.pymt.auth                1 YN       L                 *(HP2)HPZ[pz]D["I",pdi]|10                                  
 ins.state                    3 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]1|5                                  
 ins.type                    10 FREE     L  PBR.INS.TYPE   *(HP2)HPZ[pz]D["I",pdi]|15                              
 ins.zip                     10 ZIP.POST L                 *(HP2)HPZ[pz]D["I",pdi]1|6                                  
 Ì   €   i   2
dem.ins.cd.queries
[account,ins,  ins.cd.query]
*(HP2)HPZ[pz]D["I",pdi]CD[ggv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ins.cd.query                10 FREE     L                 ggv                                                         
 ins.cd.response             75 QRY.RESP L                 *(HP2)HPZ[pz]D["I",pdi]CD[ggv]|0                            
 Ì   €   i   2
dem.ins.queries
[account,ins,  query.no]
*(HP2)HPZ[pz]D["I",pdi]Q[pzIQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 query.no                     2 PINT     R                 pzIQ                                                        
 query.info                  75 QRY.RESP L                 *(HP2)HPZ[pz]D["I",pdi]Q[pzIQ]|0                            
 query.mnemonic              10 FREE     L  MIS.QUERY      *(HP2)HPZ[pz]D["I",pdi]Q[pzIQ]|1                        
 query.screen                60 FREE     L                 VAL=@Color.use(@Z.color.labels)_@MIS.QUERY.text[@PBR.A      
                                                           VAL=CT.query.mnemonic[PBR.ACT.account,ins,query.no]]:6      
                                                           VAL=4L_@Color.use(@Z.color.data)                            
 query.text                  40 FREE     L                 *(HP2)HPZ[pz]D["I",pdi]Q[pzIQ]|2                            
 Ì   €   i   2
dem.ins.order
[account,  ins.seq.no]
*(HP2)HPZ[pz]D["IO",pzIO]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ins.seq.no                   2 URN      L                 pzIO                                                        
 ins.mnemonic                10 FREE     L  PBR.INS        *(HP2)HPZ[pz]D["IO",pzIO]|0                             
 Ì   €   i   2
dem.related.persons
[account,  rp.seq.no]
*(HP2)HPZ[pz]D["P",pzPN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 rp.seq.no                    2 FREE     L                 pzPN                                                        
 ..dont.use.fab               0 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]|16                                 
 ..dont.use.fam               0 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]|18                                 
 ..dont.use.fb                0 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]|15                                 
 rp.active                    1 YN       L                 *(HP2)HPZ[pz]D["P",pzPN]|0                                  
 rp.addr1                    30 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]1|0                                 
 rp.addr2                    30 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]1|1                                 
 rp.birthdate                10 BDATE    L                 *(HP2)HPZ[pz]D["P",pzPN]|8                                  
 rp.bus.phone                18 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]|4                                  
 rp.city                     20 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]1|2                                 
 rp.edit                      1 YN       L                 *(HP2)HPZ[pz]D["P",pzPN]|13                                 
 rp.emp.addr1                30 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]3|5                                 
 rp.emp.addr2                30 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]3|6                                 
 rp.emp.city                 20 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]3|7                                 
 rp.emp.name                 30 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]3|4                                 
 rp.emp.phone                18 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]3|10                                
 rp.emp.state                 3 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]3|8                                 
 rp.emp.status               10 FREE     L  MIS.EMP.STATUS *(HP2)HPZ[pz]D["P",pzPN]3|1                             
 rp.emp.zip                  10 ZIP.POST L                 *(HP2)HPZ[pz]D["P",pzPN]3|9                                 
 rp.employee.id              10 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]3|2                                 
 rp.employer                 10 FREE     L  PBR.EMPLOYER   *(HP2)HPZ[pz]D["P",pzPN]3|3                             
 rp.family.rp                 2 PINT     R                 *(HP2)HPZ[pz]D["P",pzPN]|17                                 
 rp.guarantor                 1 YN       L                 *(HP2)HPZ[pz]D["P",pzPN]|12                                 
 rp.home.phone               18 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]1|5                                 
 rp.language                 10 FREE     L  PBR.LANGUAGE   *(HP2)HPZ[pz]D["P",pzPN]|10                             
 rp.marital.status           10 FREE     L  MIS.MAR.STATUS *(HP2)HPZ[pz]D["P",pzPN]|9                              
 rp.name                     30 NAME     L                 *(HP2)HPZ[pz]D["P",pzPN]|1                                  
 rp.nok                       1 YN       L                 *(HP2)HPZ[pz]D["P",pzPN]|20                                 
 rp.occupation               20 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]3|0                                 
 rp.ptn                       1 YN       L                 *(HP2)HPZ[pz]D["P",pzPN]|19                                 
 rp.relat                    10 FREE     L  MIS.RELAT      *(HP2)HPZ[pz]D["P",pzPN]|2                              
 rp.same.addr                 1 YN       L                 *(HP2)HPZ[pz]D["P",pzPN]|3                                  
 rp.sex                       1 CHOICE   L                 *(HP2)HPZ[pz]D["P",pzPN]|7                                  
 rp.soc.sec                  13 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]|6                                  
 rp.state                     3 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]1|3                                 
 rp.temp.addr.edit            1 YN       L                 *(HP2)HPZ[pz]D["P",pzPN]|14                                 
 rp.temp.addr.exists          6 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]|5                                  
 rp.temp.addr1               30 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]2|0                                 
 rp.temp.addr2               30 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]2|1                                 
 rp.temp.bus.phone           18 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]2|6                                 
 rp.temp.city                20 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]2|2                                 
 rp.temp.home.phone          18 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]2|5                                 
 rp.temp.state                3 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]2|3                                 
 rp.temp.zip                 10 ZIP.POST L                 *(HP2)HPZ[pz]D["P",pzPN]2|4                                 
 rp.title                    10 FREE     L                 *(HP2)HPZ[pz]D["P",pzPN]|11                                 
 rp.zip                      10 ZIP.POST L                 *(HP2)HPZ[pz]D["P",pzPN]1|4                                 
 Ì   €   i   2
dem.sig.dates
[account,  sig.date]
*(HP2)HPZ[pz]D["S",pzSRD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 sig.date                     8 DATE     L                 pzSRD                                                       
 Ì   €   i   2
recall
[account,  recall.date]
*(HP2)HPZ[pz]D["R",pzRCD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 recall.date                  8 DATE     L                 pzRCD                                                       
 recall.comment              49 FREE     L                 *(HP2)HPZ[pz]D["R",pzRCD]|1                                 
 recall.doctor                8 FREE     L  PBR.DOCTOR     *(HP2)HPZ[pz]D["R",pzRCD]|0                             
 recall.rsn                  10 FREE     L  PBR.RCAL.RSN   *(HP2)HPZ[pz]D["R",pzRCD]|2                             
 Ì   €   i   2
month.end
[account,  me.month]
*(HP2)HPZ[pz]W[pk]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 me.month                     6 INT      R                 pk                                                          
 me.acct.type                 4 FREE     L  PBR.ACCT.TYPE  *(HP2)HPZ[pz]W[pk]|5                                    
 me.balance                   9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]|3                                        
 me.collector                10 FREE     L  PBR.COLLECTOR  *(HP2)HPZ[pz]W[pk]|6                                    
 me.emplr                    10 FREE     L  PBR.EMPLOYER   *(HP2)HPZ[pz]W[pk]|8                                    
 me.end.txn                   5 URN      L                 *(HP2)HPZ[pz]W[pk]|1                                        
 me.pbr.status                2 FREE     L                 *(HP2)HPZ[pz]W[pk]|4                                        
 me.pri.ins                  10 FREE     L  PBR.INS        *(HP2)HPZ[pz]W[pk]|2                                    
 me.pt.balance                9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]|9                                        
 me.ptpc.reason              10 FREE     L  PBR.PRECOLLECT *(HP2)HPZ[pz]W[pk]|7                                    
 me.start.txn                 5 URN      L                 *(HP2)HPZ[pz]W[pk]|0                                        
 Ì   €   i   2
me.receivables
[account,me.month,  me.doctor,me.location]
*(HP2)HPZ[pz]W[pk]R[pdd,pdl]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 me.doctor                    8 FREE     L  PBR.DOCTOR     pdd                                                     
 me.location                  8 FREE     L  PBR.LOCATION   pdl                                                     
 me.age.0                     9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl]|1                              
 me.age.1                     9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl]|2                              
 me.age.2                     9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl]|3                              
 me.age.3                     9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl]|4                              
 me.age.4                     9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl]|5                              
 me.age.5                     9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl]|6                              
 me.age.6                     9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl]|7                              
 me.ar.age.0                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.age.0-@me.bdt.age.      
                                                           VAL=0;@me.pbr.status="AR" @me.age.0}                        
 me.ar.age.1                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.age.1-@me.bdt.age.      
                                                           VAL=1;@me.pbr.status="AR" @me.age.1}                        
 me.ar.age.2                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.age.2-@me.bdt.age.      
                                                           VAL=2;@me.pbr.status="AR" @me.age.2}                        
 me.ar.age.3                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.age.3-@me.bdt.age.      
                                                           VAL=3;@me.pbr.status="AR" @me.age.3}                        
 me.ar.age.4                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.age.4-@me.bdt.age.      
                                                           VAL=4;@me.pbr.status="AR" @me.age.4}                        
 me.ar.age.5                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.age.5-@me.bdt.age.      
                                                           VAL=5;@me.pbr.status="AR" @me.age.5}                        
 me.ar.age.6                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.age.6-@me.bdt.age.      
                                                           VAL=6;@me.pbr.status="AR" @me.age.6}                        
 me.ar.total                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.total-@me.bdt.tota      
                                                           VAL=l;@me.pbr.status="AR" @me.total}                        
 me.bd.age.0                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.bdt.age.0;@me.pbr.      
                                                           VAL=status="BD" @me.age.0}                                  
 me.bd.age.1                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.bdt.age.1;@me.pbr.      
                                                           VAL=status="BD" @me.age.1}                                  
 me.bd.age.2                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.bdt.age.2;@me.pbr.      
                                                           VAL=status="BD" @me.age.2}                                  
 me.bd.age.3                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.bdt.age.3;@me.pbr.      
                                                           VAL=status="BD" @me.age.3}                                  
 me.bd.age.4                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.bdt.age.4;@me.pbr.      
                                                           VAL=status="BD" @me.age.4}                                  
 me.bd.age.5                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.bdt.age.5;@me.pbr.      
                                                           VAL=status="BD" @me.age.5}                                  
 me.bd.age.6                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.bdt.age.6;@me.pbr.      
                                                           VAL=status="BD" @me.age.6}                                  
 me.bd.total                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.bdt.total;@me.pbr.      
                                                           VAL=status="BD" @me.total}                                  
 me.total                     9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl]|0                              
 Ì   €   i   2
me.ins.receivables
[account,me.month,me.doctor,me.location,  mei.ins]
*(HP2)HPZ[pz]W[pk]R[pdd,pdl,pdi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mei.ins                     10 FREE     L  PBR.INS        pdi                                                     
 mei.age.0                    9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl,pdi]|1                          
 mei.age.1                    9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl,pdi]|2                          
 mei.age.2                    9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl,pdi]|3                          
 mei.age.3                    9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl,pdi]|4                          
 mei.age.4                    9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl,pdi]|5                          
 mei.age.5                    9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl,pdi]|6                          
 mei.age.6                    9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl,pdi]|7                          
 mei.ar.age.0                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.age.0-@mei.bdt.ag      
                                                           VAL=e.0;@me.pbr.status="AR" @mei.age.0}                     
 mei.ar.age.1                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.age.1-@mei.bdt.ag      
                                                           VAL=e.1;@me.pbr.status="AR" @mei.age.1}                     
 mei.ar.age.2                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.age.2-@mei.bdt.ag      
                                                           VAL=e.2;@me.pbr.status="AR" @mei.age.2}                     
 mei.ar.age.3                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.age.3-@mei.bdt.ag      
                                                           VAL=e.3;@me.pbr.status="AR" @mei.age.3}                     
 mei.ar.age.4                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.age.4-@mei.bdt.ag      
                                                           VAL=e.4;@me.pbr.status="AR" @mei.age.4}                     
 mei.ar.age.5                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.age.5-@mei.bdt.ag      
                                                           VAL=e.5;@me.pbr.status="AR" @mei.age.5}                     
 mei.ar.age.6                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.age.6-@mei.bdt.ag      
                                                           VAL=e.6;@me.pbr.status="AR" @mei.age.6}                     
 mei.ar.total                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.total-@mei.bdt.to      
                                                           VAL=tal;@me.pbr.status="AR" @mei.total}                     
 mei.bd.age.0                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.bdt.age.0;@me.pbr      
                                                           VAL=.status="BD" @mei.age.0}                                
 mei.bd.age.1                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.bdt.age.1;@me.pbr      
                                                           VAL=.status="BD" @mei.age.1}                                
 mei.bd.age.2                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.bdt.age.2;@me.pbr      
                                                           VAL=.status="BD" @mei.age.2}                                
 mei.bd.age.3                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.bdt.age.3;@me.pbr      
                                                           VAL=.status="BD" @mei.age.3}                                
 mei.bd.age.4                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.bdt.age.4;@me.pbr      
                                                           VAL=.status="BD" @mei.age.4}                                
 mei.bd.age.5                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.bdt.age.5;@me.pbr      
                                                           VAL=.status="BD" @mei.age.5}                                
 mei.bd.age.6                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.bdt.age.6;@me.pbr      
                                                           VAL=.status="BD" @mei.age.6}                                
 mei.bd.total                 9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.bdt.total;@me.pbr      
                                                           VAL=.status="BD" @mei.total}                                
 mei.total                    9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]R[pdd,pdl,pdi]|0                          
 Ì   €   i   2
me.receivables.ser.date
[account,me.month,  me.ser.doctor,me.ser.location]
*(HP2)HPZ[pz]W[pk]S[pdd,pdl]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 me.ser.doctor                8 FREE     L  PBR.DOCTOR     pdd                                                     
 me.ser.location              8 FREE     L  PBR.LOCATION   pdl                                                     
 me.ser.age.0                 9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl]|1                              
 me.ser.age.1                 9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl]|2                              
 me.ser.age.2                 9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl]|3                              
 me.ser.age.3                 9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl]|4                              
 me.ser.age.4                 9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl]|5                              
 me.ser.age.5                 9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl]|6                              
 me.ser.age.6                 9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl]|7                              
 me.ser.ar.age.0              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.age.0-@me.ser.      
                                                           VAL=bdt.age.0;@me.pbr.status="AR" @me.ser.age.0}            
 me.ser.ar.age.1              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.age.1-@me.ser.      
                                                           VAL=bdt.age.1;@me.pbr.status="AR" @me.ser.age.1}            
 me.ser.ar.age.2              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.age.2-@me.ser.      
                                                           VAL=bdt.age.2;@me.pbr.status="AR" @me.ser.age.2}            
 me.ser.ar.age.3              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.age.3-@me.ser.      
                                                           VAL=bdt.age.3;@me.pbr.status="AR" @me.ser.age.3}            
 me.ser.ar.age.4              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.age.4-@me.ser.      
                                                           VAL=bdt.age.4;@me.pbr.status="AR" @me.ser.age.4}            
 me.ser.ar.age.5              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.age.5-@me.ser.      
                                                           VAL=bdt.age.5;@me.pbr.status="AR" @me.ser.age.5}            
 me.ser.ar.age.6              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.age.6-@me.ser.      
                                                           VAL=bdt.age.6;@me.pbr.status="AR" @me.ser.age.6}            
 me.ser.ar.total              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.total-@me.ser.      
                                                           VAL=bdt.total;@me.pbr.status="AR" @me.ser.total}            
 me.ser.bd.age.0              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.bdt.age.0;@me.      
                                                           VAL=pbr.status="BD" @me.ser.age.0}                          
 me.ser.bd.age.1              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.bdt.age.1;@me.      
                                                           VAL=pbr.status="BD" @me.ser.age.1}                          
 me.ser.bd.age.2              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.bdt.age.2;@me.      
                                                           VAL=pbr.status="BD" @me.ser.age.2}                          
 me.ser.bd.age.3              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.bdt.age.3;@me.      
                                                           VAL=pbr.status="BD" @me.ser.age.3}                          
 me.ser.bd.age.4              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.bdt.age.4;@me.      
                                                           VAL=pbr.status="BD" @me.ser.age.4}                          
 me.ser.bd.age.5              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.bdt.age.5;@me.      
                                                           VAL=pbr.status="BD" @me.ser.age.5}                          
 me.ser.bd.age.6              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.bdt.age.6;@me.      
                                                           VAL=pbr.status="BD" @me.ser.age.6}                          
 me.ser.bd.total              9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @me.ser.bdt.total;@me.      
                                                           VAL=pbr.status="BD" @me.ser.total}                          
 me.ser.total                 9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl]|0                              
 Ì   €   i   2
me.ins.receivables.ser
[account,me.month,me.ser.doctor,me.ser.location,  mei.ins.ser]
*(HP2)HPZ[pz]W[pk]S[pdd,pdl,pdi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mei.ins.ser                 10 FREE     L  PBR.INS        pdi                                                     
 mei.ser.age.0                9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl,pdi]|1                          
 mei.ser.age.1                9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl,pdi]|2                          
 mei.ser.age.2                9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl,pdi]|3                          
 mei.ser.age.3                9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl,pdi]|4                          
 mei.ser.age.4                9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl,pdi]|5                          
 mei.ser.age.5                9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl,pdi]|6                          
 mei.ser.age.6                9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl,pdi]|7                          
 mei.ser.ar.age.0             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.age.0-@mei.se      
                                                           VAL=r.bdt.age.0;@me.pbr.status="AR" @mei.ser.age.0}         
 mei.ser.ar.age.1             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.age.1-@mei.se      
                                                           VAL=r.bdt.age.1;@me.pbr.status="AR" @mei.ser.age.1}         
 mei.ser.ar.age.2             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.age.2-@mei.se      
                                                           VAL=r.bdt.age.2;@me.pbr.status="AR" @mei.ser.age.2}         
 mei.ser.ar.age.3             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.age.3-@mei.se      
                                                           VAL=r.bdt.age.3;@me.pbr.status="AR" @mei.ser.age.3}         
 mei.ser.ar.age.4             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.age.4-@mei.se      
                                                           VAL=r.bdt.age.4;@me.pbr.status="AR" @mei.ser.age.4}         
 mei.ser.ar.age.5             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.age.5-@mei.se      
                                                           VAL=r.bdt.age.5;@me.pbr.status="AR" @mei.ser.age.5}         
 mei.ser.ar.age.6             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.age.6-@mei.se      
                                                           VAL=r.bdt.age.6;@me.pbr.status="AR" @mei.ser.age.6}         
 mei.ser.ar.total             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.total-@mei.se      
                                                           VAL=r.bdt.total;@me.pbr.status="AR" @mei.ser.total}         
 mei.ser.bd.age.0             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.bdt.age.0;@me      
                                                           VAL=.pbr.status="BD" @mei.ser.age.0}                        
 mei.ser.bd.age.1             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.bdt.age.1;@me      
                                                           VAL=.pbr.status="BD" @mei.ser.age.1}                        
 mei.ser.bd.age.2             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.bdt.age.2;@me      
                                                           VAL=.pbr.status="BD" @mei.ser.age.2}                        
 mei.ser.bd.age.3             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.bdt.age.3;@me      
                                                           VAL=.pbr.status="BD" @mei.ser.age.3}                        
 mei.ser.bd.age.4             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.bdt.age.4;@me      
                                                           VAL=.pbr.status="BD" @mei.ser.age.4}                        
 mei.ser.bd.age.5             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.bdt.age.5;@me      
                                                           VAL=.pbr.status="BD" @mei.ser.age.5}                        
 mei.ser.bd.age.6             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.bdt.age.6;@me      
                                                           VAL=.pbr.status="BD" @mei.ser.age.6}                        
 mei.ser.bd.total             9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @mei.ser.bdt.total;@me      
                                                           VAL=.pbr.status="BD" @mei.ser.total}                        
 mei.ser.total                9 SMONEY   R                 *(HP2)HPZ[pz]W[pk]S[pdd,pdl,pdi]|0                          
 Ì   €   i   2
receivables
[account,  rc.doctor,rc.location]
*(HP2)HPZ[pz]R[pdd,pdl]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 rc.doctor                    8 FREE     L  PBR.DOCTOR     pdd                                                     
 rc.location                  8 FREE     L  PBR.LOCATION   pdl                                                     
 rc.age.0                     9 SMONEY   R                 *(HP2)HPZ[pz]R[pdd,pdl]|1                                   
 rc.age.1                     9 SMONEY   R                 *(HP2)HPZ[pz]R[pdd,pdl]|2                                   
 rc.age.2                     9 SMONEY   R                 *(HP2)HPZ[pz]R[pdd,pdl]|3                                   
 rc.age.3                     9 SMONEY   R                 *(HP2)HPZ[pz]R[pdd,pdl]|4                                   
 rc.age.4                     9 SMONEY   R                 *(HP2)HPZ[pz]R[pdd,pdl]|5                                   
 rc.age.5                     9 SMONEY   R                 *(HP2)HPZ[pz]R[pdd,pdl]|6                                   
 rc.age.6                     9 SMONEY   R                 *(HP2)HPZ[pz]R[pdd,pdl]|7                                   
 rc.ar.age.0                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.age.0-@rc.bdt.age.      
                                                           VAL=0;@pbr.status="AR" @rc.age.0}                           
 rc.ar.age.1                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.age.1-@rc.bdt.age.      
                                                           VAL=1;@pbr.status="AR" @rc.age.1}                           
 rc.ar.age.2                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.age.2-@rc.bdt.age.      
                                                           VAL=2;@pbr.status="AR" @rc.age.2}                           
 rc.ar.age.3                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.age.3-@rc.bdt.age.      
                                                           VAL=3;@pbr.status="AR" @rc.age.3}                           
 rc.ar.age.4                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.age.4-@rc.bdt.age.      
                                                           VAL=4;@pbr.status="AR" @rc.age.4}                           
 rc.ar.age.5                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.age.5-@rc.bdt.age.      
                                                           VAL=5;@pbr.status="AR" @rc.age.5}                           
 rc.ar.age.6                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.age.6-@rc.bdt.age.      
                                                           VAL=6;@pbr.status="AR" @rc.age.6}                           
 rc.ar.total                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.total-@rc.bdt.tota      
                                                           VAL=l;@pbr.status="AR" @rc.total}                           
 rc.bd.age.0                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.bdt.age.0;@pbr.sta      
                                                           VAL=tus="BD" @rc.age.0}                                     
 rc.bd.age.1                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.bdt.age.1;@pbr.sta      
                                                           VAL=tus="BD" @rc.age.1}                                     
 rc.bd.age.2                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.bdt.age.2;@pbr.sta      
                                                           VAL=tus="BD" @rc.age.2}                                     
 rc.bd.age.3                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.bdt.age.3;@pbr.sta      
                                                           VAL=tus="BD" @rc.age.3}                                     
 rc.bd.age.4                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.bdt.age.4;@pbr.sta      
                                                           VAL=tus="BD" @rc.age.4}                                     
 rc.bd.age.5                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.bdt.age.5;@pbr.sta      
                                                           VAL=tus="BD" @rc.age.5}                                     
 rc.bd.age.6                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.bdt.age.6;@pbr.sta      
                                                           VAL=tus="BD" @rc.age.6}                                     
 rc.bd.total                  9 SMONEY   R                 VAL=IF{@PBR.PARAM.bd.by.txn="Y" @rc.bdt.total;@pbr.sta      
                                                           VAL=tus="BD" @rc.total}                                     
 rc.total                     9 SMONEY   R                 *(HP2)HPZ[pz]R[pdd,pdl]|0                                   
 Ì   €   i   2
txns.conv.map
[account,  txn.conv.old.seq]
*(HP2)HPZ[pz]T["M",pzTQO]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.conv.old.seq             5 INT      R                 pzTQO                                                       
 txn.conv.new.seq             5 INT      R                 *(HP2)HPZ[pz]T["M",pzTQO]|0                                 
 Ì   €   i   2
txns.cur.urns
[account,  cur.urn]
*(HP2)HPZ[pz]T["C",pzT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 cur.urn                      5 URN      L                 pzT                                                         
 cur.value                    1 INT      R                 *(HP2)HPZ[pz]T["C",pzT]|0                                   
 Ì   €   i   2
txns.edit
[account,  el.txn.urn]
*(HP2)HPZ[pz]T["E",pzTE]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 el.txn.urn                   5 URN      L                 pzTE                                                        
 el.date                      8 DATE     L                 *(HP2)HPZ[pz]T["E",pzTE]|0                                  
 el.extra.desc               20 FREE     L                 *(HP2)HPZ[pz]T["E",pzTE]|6                                  
 el.item                     10 FREE     L  PBR.EDIT       *(HP2)HPZ[pz]T["E",pzTE]|1                              
 el.new.val                  30 FREE     L                 *(HP2)HPZ[pz]T["E",pzTE]|5                                  
 el.old.val                  30 FREE     L                 *(HP2)HPZ[pz]T["E",pzTE]|4                                  
 el.time                      4 HHMM     L                 *(HP2)HPZ[pz]T["E",pzTE]|2                                  
 el.user                     10 FREE     L  MIS.USER       *(HP2)HPZ[pz]T["E",pzTE]|3                              
 Ì   €   i   2
txns.fin
[account,  txn.urn]
*(HP2)HPZ[pz]T["A",pzT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.urn                      5 URN      L                 pzT                                                         
 ..do.not.use                 1 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]|25                                  
 ..vis.do.not.use             0 PINT     R                 *(HP2)HPZ[pz]T["A",pzT]C|3                                  
 .do.not.use.more.offsets     1 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]A|22                                 
 .use.txns.fin.add.2          1 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]A|23                                 
 txn.add.desc                40 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]TX|0                                 
 txn.age.offset               1 INT      R                 *(HP2)HPZ[pz]T["A",pzT]|17                                  
 txn.amount                   9 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]|9                                   
 txn.amount.remaining         9 MONEY    R                 *(HP2)HPZ[pz]T["A",pzT]|10                                  
 txn.amount.undist            9 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]|21                                  
 txn.balance                  9 MONEY    R                 *(HP2)HPZ[pz]T["A",pzT]|11                                  
 txn.bch                      3 PINT     R                 *(HP2)HPZ[pz]T["A",pzT]|3                                   
 txn.bch.date                 8 DATE     L                 VAL=(@PBR.ACT.txn.ser.date-@PBR.ACT.txn.bch.date.offse      
                                                           VAL=t)                                                      
 txn.bch.date.offset          5 INT      R                 *(HP2)HPZ[pz]T["A",pzT]|2                                   
 txn.bch.entry                4 PINT     R                 *(HP2)HPZ[pz]T["A",pzT]|4                                   
 txn.bd.adj.amt               9 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]B|10                                 
 txn.bd.balance               9 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]B|8                                  
 txn.bd.conv                  1 YN       L                 *(HP2)HPZ[pz]T["A",pzT]B|20                                 
 txn.bd.dis.amt               9 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]B|12                                 
 txn.bd.last.pay.dt           8 DATE     L                 *(HP2)HPZ[pz]T["A",pzT]B|13                                 
 txn.bd.rcp.amt               9 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]B|9                                  
 txn.bd.ref.amt               9 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]B|11                                 
 txn.bd.txn.urn               5 URN      L                 *(HP2)HPZ[pz]T["A",pzT]B|5                                  
 txn.bd.xfr.amt               9 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]B|7                                  
 txn.bill                     6 INT      R                 *(HP2)HPZ[pz]T["A",pzT]|18                                  
 txn.claim.excp              10 FREE     L  PBR.CLAIM.EXCP *(HP2)HPZ[pz]T["A",pzT]B|14                             
 txn.client                  12 FREE     L  PBR.CLNT       *(HP2)HPZ[pz]T["A",pzT]B|19                             
 txn.clnt.acct               44 URN      L  PBR.ACT        *(HP2)HPZ[pz]T["A",pzT]B|15                             
 txn.clnt.txn.urn             5 URN      L                 *(HP2)HPZ[pz]T["A",pzT]B|16                                 
 txn.coll.ag                 10 FREE     L  PBR.COL.AG     *(HP2)HPZ[pz]T["A",pzT]B|6                              
 txn.coll.held.amt           10 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]A|3                                  
 txn.conv.batch              15 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]A|21                                 
 txn.conv.seq                 5 INT      R                 *(HP2)HPZ[pz]T["A",pzT]A|20                                 
 txn.denial.rsn              10 FREE     L  PBR.DEN.RSN    *(HP2)HPZ[pz]T["A",pzT]A|11                             
 txn.denial.rsn.bch           5 PINT     R                 *(HP2)HPZ[pz]T["A",pzT]A|15                                 
 txn.denial.rsn.date          8 DATE     L                 *(HP2)HPZ[pz]T["A",pzT]A|14                                 
 txn.denial.rsn.hist          4 URN      L                 *(HP2)HPZ[pz]T["A",pzT]A|12                                 
 txn.denial.rsn.user         10 FREE     L  MIS.USER       *(HP2)HPZ[pz]T["A",pzT]A|13                             
 txn.diag.1                   6 FREE     L                 VAL=@txn.diag.codes#"0,"                                    
 txn.diag.10                  6 FREE     L                 VAL=@txn.diag.codes#"9,"                                    
 txn.diag.11                  6 FREE     L                 VAL=@txn.diag.codes#"10,"                                   
 txn.diag.12                  6 FREE     L                 VAL=@txn.diag.codes#"11,"                                   
 txn.diag.2                   6 FREE     L                 VAL=@txn.diag.codes#"1,"                                    
 txn.diag.3                   6 FREE     L                 VAL=@txn.diag.codes#"2,"                                    
 txn.diag.4                   6 FREE     L                 VAL=@txn.diag.codes#"3,"                                    
 txn.diag.5                   6 FREE     L                 VAL=@txn.diag.codes#"4,"                                    
 txn.diag.6                   6 FREE     L                 VAL=@txn.diag.codes#"5,"                                    
 txn.diag.7                   6 FREE     L                 VAL=@txn.diag.codes#"6,"                                    
 txn.diag.8                   6 FREE     L                 VAL=@txn.diag.codes#"7,"                                    
 txn.diag.9                   6 FREE     L                 VAL=@txn.diag.codes#"8,"                                    
 txn.diag.codes              80 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]DX|0                                 
 txn.diag.side.ind           20 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]DX|1                                 
 txn.doctor                   8 FREE     L  PBR.DOCTOR     *(HP2)HPZ[pz]T["A",pzT]|5                               
 txn.epi.seq                  5 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]|14                                  
 txn.exploded.proc           10 FREE     L  PBR.PROC       *(HP2)HPZ[pz]T["A",pzT]A|6                              
 txn.fixed                    5 PINT     R                 *(HP2)HPZ[pz]T["A",pzT]|12                                  
 txn.fqhc                     1 YN       L                 *(HP2)HPZ[pz]T["A",pzT]A|17                                 
 txn.fqhc.cat                10 FREE     L  PBR.CHG.CAT    *(HP2)HPZ[pz]T["A",pzT]A|18                             
 txn.hold.days                4 INT      R                 *(HP2)HPZ[pz]T["A",pzT]A|1                                  
 txn.hold.dis.seq             4 PINT     R                 *(HP2)HPZ[pz]T["A",pzT]A|4                                  
 txn.ins                     10 FREE     L  PBR.INS        *(HP2)HPZ[pz]T["A",pzT]|19                              
 txn.location                 8 FREE     L  PBR.LOCATION   *(HP2)HPZ[pz]T["A",pzT]|6                               
 txn.me.pri.ins              10 FREE     L  PBR.INS        *(HP2)HPZ[pz]T["A",pzT]|23                              
 txn.meditech.bch.id         29 INT      R                 *(HP2)HPZ[pz]T["A",pzT]A|5                                  
 txn.minutes                  5 SINT     R                 *(HP2)HPZ[pz]T["A",pzT]A|10                                 
 txn.modifier                 6 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]A|8                                  
 txn.ny.hcra.cat             10 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]B|21                                 
 txn.pbr.status               2 CHOICE   L                 *(HP2)HPZ[pz]T["A",pzT]|20                                  
 txn.procedure               10 FREE     L  PBR.PROC       *(HP2)HPZ[pz]T["A",pzT]|7                               
 txn.prv.enc                 10 PINT     R                 *(HP2)HPZ[pz]T["A",pzT]B|0                                  
 txn.prv.practice            10 FREE     L  MIS.DOC.GRP    *(HP2)HPZ[pz]T["A",pzT]B|1                              
 txn.prv.user                10 FREE     L  MIS.USER       *(HP2)HPZ[pz]T["A",pzT]B|2                              
 txn.pt.acct                 44 URN      L  PBR.ACT        *(HP2)HPZ[pz]T["A",pzT]B|17                             
 txn.pt.amt.remaining         9 MONEY    R                 *(HP2)HPZ[pz]T["A",pzT]|15                                  
 txn.pt.initial.amt           9 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]A|7                                  
 txn.pt.txn.urn               5 URN      L                 *(HP2)HPZ[pz]T["A",pzT]B|18                                 
 txn.quantity                 5 SINT     R                 *(HP2)HPZ[pz]T["A",pzT]|8                                   
 txn.ref.in.phy              10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]T["A",pzT]|13                              
 txn.ref.out.phy             10 FREE     L  MIS.DOC        *(HP2)HPZ[pz]T["A",pzT]A|0                              
 txn.rev.rsn                 10 FREE     L  PBR.REV.RSN    *(HP2)HPZ[pz]T["A",pzT]A|2                              
 txn.self.pay                 1 YN       L                 *(HP2)HPZ[pz]T["A",pzT]A|9                                  
 txn.ser.date                 8 DATE     L                 *(HP2)HPZ[pz]T["A",pzT]|1                                   
 txn.sf.applied               1 YN       L                 *(HP2)HPZ[pz]T["A",pzT]A|16                                 
 txn.suppressed               1 CHOICE   L                 *(HP2)HPZ[pz]T["A",pzT]|24                                  
 txn.therapist                8 FREE     L  PBR.DOCTOR     *(HP2)HPZ[pz]T["A",pzT]|22                              
 txn.time1                    4 HHMM     L                 *(HP2)HPZ[pz]T["A",pzT]B|3                                  
 txn.time2                    4 HHMM     L                 *(HP2)HPZ[pz]T["A",pzT]B|4                                  
 txn.type                     1 CHOICE   L                 *(HP2)HPZ[pz]T["A",pzT]|0                                   
 txn.user                    10 FREE     L  MIS.USER       *(HP2)HPZ[pz]T["A",pzT]|16                              
 txn.vis.patient             30 URN      L  PBR.MPI        *(HP2)HPZ[pz]T["A",pzT]C|0                              
 txn.vis.txn.urn              5 URN      L                 *(HP2)HPZ[pz]T["A",pzT]C|2                                  
 txn.vis.urn                  5 URN      L                 *(HP2)HPZ[pz]T["A",pzT]C|1                                  
 Ì   €   i   2
txns.fin.cd.queries
[account,txn.urn,  txn.cd.query]
*(HP2)HPZ[pz]T["A",pzT]CD[ggv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.cd.query                10 FREE     L  MIS.QUERY      ggv                                                     
 txn.cd.response             75 QRY.RESP L                 *(HP2)HPZ[pz]T["A",pzT]CD[ggv]|0                            
 Ì   €   i   2
txns.fin.cd.mult.queries
[account,txn.urn,txn.cd.query,  txn.cdm.seq.no]
*(HP2)HPZ[pz]T["A",pzT]CD[ggv]M[ggvN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.cdm.seq.no               3 PINT     R                 ggvN                                                        
 txn.cdm.response            75 QRY.RESP L                 *(HP2)HPZ[pz]T["A",pzT]CD[ggv]M[ggvN]|0                     
 Ì   €   i   2
txns.fin.distrib
[account,txn.urn,  txn.dis.seq]
*(HP2)HPZ[pz]T["A",pzT]D[pzTD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.dis.seq                  4 FREE     L                 pzTD                                                        
 txn.dis.amount               9 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]D[pzTD]|1                            
 txn.dis.bd.urn               5 URN      L                 *(HP2)HPZ[pz]T["A",pzT]D[pzTD]|8                            
 txn.dis.bd.xfr.amt           9 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]D[pzTD]|9                            
 txn.dis.claim.stat           1 CHOICE   L                 *(HP2)HPZ[pz]T["A",pzT]D[pzTD]|4                            
 txn.dis.doc                  8 FREE     L  PBR.DOCTOR     *(HP2)HPZ[pz]T["A",pzT]D[pzTD]|2                        
 txn.dis.loc                  8 FREE     L  PBR.LOCATION   *(HP2)HPZ[pz]T["A",pzT]D[pzTD]|3                        
 txn.dis.ny.hcra.cat         10 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]D[pzTD]|10                           
 txn.dis.pbr.status           2 CHOICE   L                 *(HP2)HPZ[pz]T["A",pzT]D[pzTD]|7                            
 txn.dis.undist.acct         44 URN      L  PBR.ACT        *(HP2)HPZ[pz]T["A",pzT]D[pzTD]|6                        
 txn.dis.urn                  5 URN      L                 *(HP2)HPZ[pz]T["A",pzT]D[pzTD]|0                            
 txn.dis.xfr.ins             10 FREE     L  PBR.INS        *(HP2)HPZ[pz]T["A",pzT]D[pzTD]|5                        
 Ì   €   i   2
txns.fin.pymt.bal
[account,txn.urn,  txins.ins]
*(HP2)HPZ[pz]T["A",pzT]P[pdi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txins.ins                   10 FREE     L  PBR.INS        pdi                                                     
 txins.last.claim.txn         6 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]|0                             
 txins.last.col.txn           6 FREE     L                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]|4                             
 txins.processed              1 YN       L                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]|3                             
 txins.stmt.adj.hld          10 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]|6                             
 txins.stmt.old.dis.seq       2 PINT     R                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]|9                             
 txins.stmt.rcpts.hld        10 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]|5                             
 txins.stmt.ref.hld          10 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]|8                             
 txins.total.adj             10 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]|2                             
 txins.total.rcpts           10 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]|1                             
 txins.total.ref             10 SMONEY   R                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]|7                             
 Ì   €   i   2
txns.old.fin.pymt.distrib
[account,txn.urn,txins.ins,  txins.old.dis.seq]
*(HP2)HPZ[pz]T["A",pzT]P[pdi]D[pzTP]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txins.old.dis.seq            2 PINT     R                 pzTP                                                        
 txins.old.dis.dis.seq        2 PINT     R                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]D[pzTP]|1                      
 txins.old.dis.txn.urn        5 URN      L                 *(HP2)HPZ[pz]T["A",pzT]P[pdi]D[pzTP]|0                      
 Ì   €   i   2
txns.fin.pymt.hist
[account,txn.urn,  txhis.seq]
*(HP2)HPZ[pz]T["A",pzT]R[pzTH]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txhis.seq                    4 PINT     R                 pzTH                                                        
 txhis.txn.dis.seq            3 PINT     R                 *(HP2)HPZ[pz]T["A",pzT]R[pzTH]|1                            
 txhis.txn.status             1 CHOICE   L                 *(HP2)HPZ[pz]T["A",pzT]R[pzTH]|2                            
 txhis.txn.urn                5 URN      L                 *(HP2)HPZ[pz]T["A",pzT]R[pzTH]|0                            
 Ì   €   i   2
txns.ins
[account,  ins.urn]
*(HP2)HPZ[pz]T["I",ppi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ins.urn                      5 URN      L                 ppi                                                         
 ins.adj.ma05                 1 YN       L                 *(HP2)HPZ[pz]T["I",ppi]|19                                  
 ins.amount                  10 MONEY    R                 *(HP2)HPZ[pz]T["I",ppi]|3                                   
 ins.claim.comment           25 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]|7                                   
 ins.claim.number            12 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]|10                                  
 ins.create.date              8 DATE     L                 *(HP2)HPZ[pz]T["I",ppi]|2                                   
 ins.denial                   3 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]|13                                  
 ins.doctor                   8 FREE     L  PBR.DOCTOR     *(HP2)HPZ[pz]T["I",ppi]|5                               
 ins.edi.group                8 FREE     L  PBR.EDI.GROUP  *(HP2)HPZ[pz]T["I",ppi]|17                              
 ins.epi.seq                  5 PINT     R                 *(HP2)HPZ[pz]T["I",ppi]|8                                   
 ins.idpa.tpl.amount.37       7 MONEY    R                 *(HP2)HPZ[pz]T["I",ppi]A|7                                  
 ins.idpa.tpl.amount.38       7 MONEY    R                 *(HP2)HPZ[pz]T["I",ppi]A|12                                 
 ins.idpa.tpl.code.37         3 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]A|5                                  
 ins.idpa.tpl.code.38         3 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]A|9                                  
 ins.idpa.tpl.date.37         8 DATE     L                 *(HP2)HPZ[pz]T["I",ppi]A|8                                  
 ins.idpa.tpl.date.38         8 DATE     L                 *(HP2)HPZ[pz]T["I",ppi]A|13                                 
 ins.idpa.tpl.status.37       2 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]A|6                                  
 ins.idpa.tpl.status.38       2 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]A|11                                 
 ins.insurance               10 FREE     L  PBR.INS        *(HP2)HPZ[pz]T["I",ppi]|1                               
 ins.loc                      8 FREE     L  PBR.LOCATION   *(HP2)HPZ[pz]T["I",ppi]|18                              
 ins.mcd.resub.code           3 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]A|2                                  
 ins.media.type               1 CHOICE   L                 *(HP2)HPZ[pz]T["I",ppi]|9                                   
 ins.num.txn.lines            2 INT      R                 *(HP2)HPZ[pz]T["I",ppi]|16                                  
 ins.number.txns              2 INT      R                 *(HP2)HPZ[pz]T["I",ppi]|0                                   
 ins.ny.hcra.excl             1 YN       L                 *(HP2)HPZ[pz]T["I",ppi]A|10                                 
 ins.org.pymt.dt              8 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]A|1                                  
 ins.over.ninety              1 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]|22                                  
 ins.override.dt              8 DATE     L                 *(HP2)HPZ[pz]T["I",ppi]A|4                                  
 ins.pama.attch.one           2 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]A|16                                 
 ins.pama.attch.two           2 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]A|17                                 
 ins.pama.no.attch            2 INT      R                 *(HP2)HPZ[pz]T["I",ppi]A|15                                 
 ins.pama.rsc.code            1 INT      R                 *(HP2)HPZ[pz]T["I",ppi]A|14                                 
 ins.print.date               8 DATE     L                 *(HP2)HPZ[pz]T["I",ppi]|4                                   
 ins.remarks                 50 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]A|18                                 
 ins.resub.code               3 INT      R                 *(HP2)HPZ[pz]T["I",ppi]|14                                  
 ins.resub.ma05               1 YN       L                 *(HP2)HPZ[pz]T["I",ppi]|20                                  
 ins.resub.ref.num           17 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]|15                                  
 ins.resub.rsn                3 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]A|0                                  
 ins.tcn.ma05                10 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]|21                                  
 ins.type.claim               2 CHOICE   L                 *(HP2)HPZ[pz]T["I",ppi]|6                                   
 ins.user                    10 FREE     L  MIS.USER       *(HP2)HPZ[pz]T["I",ppi]A|3                              
 Ì   €   i   2
txns.ins.distrib
[account,ins.urn,  ins.dis.seq]
*(HP2)HPZ[pz]T["I",ppi]T[ppiD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ins.dis.seq                  4 FREE     L                 ppiD                                                        
 ins.add.info                30 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]A|10                          
 ins.amount.oth               9 MONEY    R                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]A|7                           
 ins.co.ins                   9 MONEY    R                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]A|6                           
 ins.combine                  1 CHOICE   L                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]|2                            
 ins.deduct                   9 MONEY    R                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]A|5                           
 ins.desc                     1 CHOICE   L                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]|3                            
 ins.dis.amount               9 MONEY    R                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]|1                            
 ins.dis.msbpe                1 FREE     L                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]|10                           
 ins.dis.removed             10 FREE     L  MIS.USER       *(HP2)HPZ[pz]T["I",ppi]T[ppiD]|4                        
 ins.dis.urn                  5 URN      L                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]|0                            
 ins.from.date                8 DATE     L                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]A|0                           
 ins.mc.allow                 9 MONEY    R                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]A|3                           
 ins.mc.amount                9 MONEY    R                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]A|2                           
 ins.mc.paid                  9 MONEY    R                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]A|4                           
 ins.mc.status                1 INT      R                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]A|8                           
 ins.oth.ins                  1 INT      R                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]A|9                           
 ins.thru.date                8 DATE     L                 *(HP2)HPZ[pz]T["I",ppi]T[ppiD]A|1                           
 Ì   €   i   2
txns.stmt
[account,  stmt.urn]
*(HP2)HPZ[pz]T["B",pps]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 stmt.urn                     5 URN      L                 pps                                                         
 stmt.age.0                   8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]|6                                   
 stmt.age.1                   8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]|7                                   
 stmt.age.2                   8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]|8                                   
 stmt.age.3                   8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]|9                                   
 stmt.age.4                   8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]|10                                  
 stmt.age.5                   8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]|11                                  
 stmt.age.6                   8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]|12                                  
 stmt.ar.total                8 SMONEY   R                 VAL=((@PBR.ACT.stmt.prior.bal-@PBR.ACT.stmt.prior.bd.b      
                                                           VAL=al)+(@PBR.ACT.stmt.billed.amt-@PBR.ACT.stmt.billed      
                                                           VAL=.bd.amt))                                               
 stmt.billed.amt              9 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]|3                                   
 stmt.billed.ar.amt           9 SMONEY   R                 VAL=(@PBR.ACT.stmt.billed.amt-@PBR.ACT.stmt.billed.bd.      
                                                           VAL=amt)                                                    
 stmt.billed.bd.amt           9 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]|4                                   
 stmt.date                    8 DATE     L                 *(HP2)HPZ[pz]T["B",pps]|0                                   
 stmt.guar                   44 URN      L  PBR.GUAR       *(HP2)HPZ[pz]T["B",pps]B|0                              
 stmt.guar.stmt.urn           5 URN      L                 *(HP2)HPZ[pz]T["B",pps]B|1                                  
 stmt.number                 14 FREE     L                 *(HP2)HPZ[pz]T["B",pps]|20                                  
 stmt.open.item               1 YN       L                 *(HP2)HPZ[pz]T["B",pps]|15                                  
 stmt.pg.tot                  3 INT      R                 *(HP2)HPZ[pz]T["B",pps]|19                                  
 stmt.post.trans.to.pt        1 CHOICE   L                 *(HP2)HPZ[pz]T["B",pps]|16                                  
 stmt.print.date              8 DATE     L                 *(HP2)HPZ[pz]T["B",pps]|5                                   
 stmt.prior.ar.bal            9 SMONEY   R                 VAL=(@PBR.ACT.stmt.prior.bal-@PBR.ACT.stmt.prior.bd.ba      
                                                           VAL=l)                                                      
 stmt.prior.bal               9 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]|2                                   
 stmt.prior.bd.bal            9 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]|1                                   
 stmt.pt.age.0                8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]A|1                                  
 stmt.pt.age.1                8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]A|2                                  
 stmt.pt.age.2                8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]A|3                                  
 stmt.pt.age.3                8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]A|4                                  
 stmt.pt.age.4                8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]A|5                                  
 stmt.pt.age.5                8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]A|6                                  
 stmt.pt.age.6                8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]A|7                                  
 stmt.pt.age.offset           1 PINT     R                 *(HP2)HPZ[pz]T["B",pps]|18                                  
 stmt.pt.bill.grp.user       10 FREE     L                 *(HP2)HPZ[pz]T["B",pps]A|10                                 
 stmt.pt.billed.amt           8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]A|9                                  
 stmt.pt.prior.bal            8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]A|8                                  
 stmt.pt.sort.key1           84 FREE     L                 *(HP2)HPZ[pz]T["B",pps]A|11                                 
 stmt.pt.total                8 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]A|0                                  
 stmt.suppressed              1 CHOICE   L                 *(HP2)HPZ[pz]T["B",pps]|17                                  
 stmt.total                   8 SMONEY   R                 VAL=@stmt.prior.bal+@stmt.billed.amt                        
 stmt.type                    1 CHOICE   L                 *(HP2)HPZ[pz]T["B",pps]|13                                  
 stmt.user                   10 FREE     L  MIS.USER       *(HP2)HPZ[pz]T["B",pps]|14                              
 Ì   €   i   2
txns.stmt.distrib
[account,stmt.urn,  stmt.dis.seq]
*(HP2)HPZ[pz]T["B",pps]T[ppsD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 stmt.dis.seq                 4 FREE     L                 ppsD                                                        
 stmt.dis.bd.urn              5 URN      L                 *(HP2)HPZ[pz]T["B",pps]T[ppsD]|4                            
 stmt.dis.urn                 5 URN      L                 *(HP2)HPZ[pz]T["B",pps]T[ppsD]|0                            
 stmt.opn.amt.remaining       9 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]T[ppsD]|1                            
 stmt.opn.pt.rsp              1 YN       L                 *(HP2)HPZ[pz]T["B",pps]T[ppsD]|2                            
 stmt.pt.amt.remaining        9 SMONEY   R                 *(HP2)HPZ[pz]T["B",pps]T[ppsD]|3                            
 Ì   €   i   2
txns.text.top
[account,  txnt.urn]
*(HP2)HPZ[pz]T["T",pzTT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txnt.urn                     5 URN      L                 pzTT                                                        
 post.option                  1 CHOICE   L                                                                             
 txnt.balance                10 SMONEY   R                 *(HP2)HPZ[pz]T["T",pzTT]|8                                  
 txnt.bch.date                8 DATE     L                 *(HP2)HPZ[pz]T["T",pzTT]|13                                 
 txnt.canned.text.code       10 FREE     L  PBR.COMMENT    *(HP2)HPZ[pz]T["T",pzTT]|16                             
 txnt.date                    8 DATE     L                 *(HP2)HPZ[pz]T["T",pzTT]|1                                  
 txnt.for.date                8 DATE     L                 *(HP2)HPZ[pz]T["T",pzTT]|10                                 
 txnt.for.reminder            5 PINT     R                 *(HP2)HPZ[pz]T["T",pzTT]|14                                 
 txnt.letter                 10 FREE     L  PBR.LETTER     *(HP2)HPZ[pz]T["T",pzTT]|7                              
 txnt.letter.edited           1 YN       L                 *(HP2)HPZ[pz]T["T",pzTT]|9                                  
 txnt.letter.meth             1 CHOICE   L                 *(HP2)HPZ[pz]T["T",pzTT]|12                                 
 txnt.letter.type             1 CHOICE   L                 *(HP2)HPZ[pz]T["T",pzTT]|11                                 
 txnt.printed                 1 YN       L                 *(HP2)HPZ[pz]T["T",pzTT]|17                                 
 txnt.reminder.active         1 YN       L                 *(HP2)HPZ[pz]T["T",pzTT]|5                                  
 txnt.reminder.date           8 DATE     L                 *(HP2)HPZ[pz]T["T",pzTT]|4                                  
 txnt.reminder.for.user      10 FREE     L  MIS.USER       *(HP2)HPZ[pz]T["T",pzTT]|3                              
 txnt.reminder.resolved.by    5 PINT     R                 *(HP2)HPZ[pz]T["T",pzTT]|15                                 
 txnt.system.user             1 YN       L                 *(HP2)HPZ[pz]T["T",pzTT]|6                                  
 txnt.type                    1 CHOICE   L                 *(HP2)HPZ[pz]T["T",pzTT]|0                                  
 txnt.user                   10 FREE     L  MIS.USER       *(HP2)HPZ[pz]T["T",pzTT]|2                              
 Ì   €   i   2
txns.text
[account,txnt.urn,  txnt.text.urn]
*(HP2)HPZ[pz]T["T",pzTT]L[pzTL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txnt.text.urn                2 PINT     R                 pzTL                                                        
 txnt.text                   50 TEXT     L                 *(HP2)HPZ[pz]T["T",pzTT]L[pzTL]                             
 Ì     i   2
rpt.age.ser.date.x
[rpt.sort.name,rpt.acct,rpt.ar.doctor,rpt.ar.location]
*(HP2)HPZAS[pzN,pz,pdd,pdl]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 rpt.sort.name               30 FREE     L                 pzN                                                         
 rpt.acct                    44 URN      L  PBR.ACT        pz                                                      
 rpt.ar.doctor                8 FREE     L  PBR.DOCTOR     pdd                                                     
 rpt.ar.location              8 FREE     L  PBR.LOCATION   pdl                                                     
 rpt.age.0                    9 SMONEY   R                 *(HP2)HPZAS[pzN,pz,pdd,pdl]|1                               
 rpt.age.1                    9 SMONEY   R                 *(HP2)HPZAS[pzN,pz,pdd,pdl]|2                               
 rpt.age.2                    9 SMONEY   R                 *(HP2)HPZAS[pzN,pz,pdd,pdl]|3                               
 rpt.age.3                    9 SMONEY   R                 *(HP2)HPZAS[pzN,pz,pdd,pdl]|4                               
 rpt.age.4                    9 SMONEY   R                 *(HP2)HPZAS[pzN,pz,pdd,pdl]|5                               
 rpt.age.5                    9 SMONEY   R                 *(HP2)HPZAS[pzN,pz,pdd,pdl]|6                               
 rpt.age.6                    9 SMONEY   R                 *(HP2)HPZAS[pzN,pz,pdd,pdl]|7                               
 rpt.ar.total                 9 SMONEY   R                 *(HP2)HPZAS[pzN,pz,pdd,pdl]|0                               
 Ì     i   2
rpt.fam.age.ser.date.x
[rptf.rp.name,rptf.family,rptf.actnum,rptf.acct,rptf.ar.doctor,rptf.ar.location]
*(HP2)HPZASF[pzPM,pv,pzR,pz,pdd,pdl]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 rptf.rp.name                30 NAME     L                 pzPM                                                        
 rptf.family                 44 URN      L                 pv                                                          
 rptf.actnum                 15 FREE     L                 pzR                                                         
 rptf.acct                   44 URN      L  PBR.ACT        pz                                                      
 rptf.ar.doctor               8 FREE     L  PBR.DOCTOR     pdd                                                     
 rptf.ar.location             8 FREE     L  PBR.LOCATION   pdl                                                     
 rptf.age.0                   9 SMONEY   R                 *(HP2)HPZASF[pzPM,pv,pzR,pz,pdd,pdl]|1                      
 rptf.age.1                   9 SMONEY   R                 *(HP2)HPZASF[pzPM,pv,pzR,pz,pdd,pdl]|2                      
 rptf.age.2                   9 SMONEY   R                 *(HP2)HPZASF[pzPM,pv,pzR,pz,pdd,pdl]|3                      
 rptf.age.3                   9 SMONEY   R                 *(HP2)HPZASF[pzPM,pv,pzR,pz,pdd,pdl]|4                      
 rptf.age.4                   9 SMONEY   R                 *(HP2)HPZASF[pzPM,pv,pzR,pz,pdd,pdl]|5                      
 rptf.age.5                   9 SMONEY   R                 *(HP2)HPZASF[pzPM,pv,pzR,pz,pdd,pdl]|6                      
 rptf.age.6                   9 SMONEY   R                 *(HP2)HPZASF[pzPM,pv,pzR,pz,pdd,pdl]|7                      
 rptf.ar.total                9 SMONEY   R                 *(HP2)HPZASF[pzPM,pv,pzR,pz,pdd,pdl]|0                      
 Ì     i   2
sp.epi.txns
[st.top.urn,st.urn,st.resp.party,st.stmt.urn,st.account,  spe.epi.seq,spe.txn.urn]
*(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 spe.epi.seq                  5 URN      L                 ppsES                                                       
 spe.txn.urn                  5 URN      L                 ppsET                                                       
 spe.amount                  10 SMONEY   R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|9       
 spe.charges                  8 MONEY    R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|4       
 spe.credits                  9 MONEY    R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|5       
 spe.desc                    26 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|2       
 spe.desc2                   30 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|15      
 spe.diag1                    5 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|11      
 spe.diag2                    5 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|12      
 spe.doctor                  10 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|3       
 spe.ins.amount              10 SMONEY   R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|14      
 spe.location                10 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|6       
 spe.mod                      3 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|7       
 spe.patient                  9 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|10      
 spe.proc.code               10 FREE     L  PBR.PROC       *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|1   
 spe.pt.amount               10 SMONEY   R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|13      
 spe.quantity                 5 INT      R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|0       
 spe.ser.date                 8 DATE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]ETX[ppsES,ppsET]|8       
 Ì     i   2
sp.txns
[st.top.urn,st.urn,st.resp.party,st.stmt.urn,st.account,  sp.txn.urn]
*(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 sp.txn.urn                   5 URN      L                 ppsTX                                                       
 sp.amount                   10 SMONEY   R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|9              
 sp.charges                   8 MONEY    R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|4              
 sp.credits                   9 MONEY    R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|5              
 sp.desc                     26 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|2              
 sp.desc2                    30 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|15             
 sp.diag1                     5 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|11             
 sp.diag2                     5 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|12             
 sp.doctor                   10 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|3              
 sp.ins.amount               10 SMONEY   R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|14             
 sp.location                 10 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|6              
 sp.mo.dy                     4 INT      R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|0              
 sp.mod                       3 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|7              
 sp.patient                   9 FREE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|10             
 sp.proc.code                10 FREE     L  PBR.PROC       *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|1          
 sp.pt.amount                10 SMONEY   R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|13             
 sp.quantity                  3 INT      R                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|16             
 sp.ser.date                  8 DATE     L                 *(HP2)HPZSP[pzspt,pzsp,pzPN,pps,pz]TX[ppsTX]|8              
 Ì     i   2
stmt.txns
[stx.date,stx.bill.grp.user,stx.sort.key1,stx.account]
*(HP2)HPPS[ppsDT,ppsU,ppsK1,pz]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 stx.date                     8 DATE     L                 ppsDT                                                       
 stx.bill.grp.user           10 FREE     L                 ppsU                                                        
 stx.sort.key1               15 FREE     L                 ppsK1                                                       
 stx.account                 44 URN      L  PBR.ACT        pz                                                      
 stx.printed                  1 YN       L                 *(HP2)HPPS[ppsDT,ppsU,ppsK1,pz]|1                           
 stx.stmt.urn                 5 URN      L                 *(HP2)HPPS[ppsDT,ppsU,ppsK1,pz]|0                           
 Ì     i   2
tax.rev.rpt
[tr.tax.plan,tr.sort.key1,tr.sort.key2,tr.actnum,tr.account,tr.txn,tr.txn.dis.seq]
*(HP2)HPZTR[pbh,pztS1,pztS2,pzR,pz,pzT,pzTD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 tr.tax.plan                 10 FREE     L  PBR.TAX.PLAN   pbh                                                     
 tr.sort.key1                10 FREE     L                 pztS1                                                       
 tr.sort.key2                10 FREE     L                 pztS2                                                       
 tr.actnum                   12 FREE     L                 pzR                                                         
 tr.account                  44 URN      L  PBR.ACT        pz                                                      
 tr.txn                       5 URN      L                 pzT                                                         
 tr.txn.dis.seq               5 PINT     R                 pzTD                                                        
 tr.exempt.amt               11 SMONEY   R                 *(HP2)HPZTR[pbh,pztS1,pztS2,pzR,pz,pzT,pzTD]|1              
 tr.taxable.amt              11 SMONEY   R                 *(HP2)HPZTR[pbh,pztS1,pztS2,pzR,pz,pzT,pzTD]|0              
 Ì     i   2
tax.rev.rpt.summary
[trs.payor,trs.location,trs.txn.payor,trs.procedure]
*(HP2)HPZTS[pdy,pdl,pdy2,pdp]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 trs.payor                   10 FREE     L  PBR.PAYOR      pdy                                                     
 trs.location                 8 FREE     L  PBR.LOCATION   pdl                                                     
 trs.txn.payor               10 FREE     L                 pdy2                                                        
 trs.procedure               10 FREE     L  PBR.PROC       pdp                                                     
 trs.exempt.amt              11 SMONEY   R                 *(HP2)HPZTS[pdy,pdl,pdy2,pdp]|1                             
 trs.taxable.amt             11 SMONEY   R                 *(HP2)HPZTS[pdy,pdl,pdy2,pdp]|0                             
 Ì     i   2
tax.revenue.report
[trr.account,trr.payor,trr.location,trr.procedure]
*(HP2)HPZTRR[pz,pdy,pdl,pdp]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 trr.account                 44 URN      L                 pz                                                          
 trr.payor                   10 FREE     L  PBR.PAYOR      pdy                                                     
 trr.location                 8 FREE     L  PBR.LOCATION   pdl                                                     
 trr.procedure               10 FREE     L  PBR.PROC       pdp                                                     
 trr.exempt.amt              10 MONEY    R                 *(HP2)HPZTRR[pz,pdy,pdl,pdp]|0                              
 trr.taxable.amt             10 MONEY    R                 *(HP2)HPZTRR[pz,pdy,pdl,pdp]|1                              
 Ì     i   2
txns.bad.debt.index
[tbd.account,tbd.coll.ag,tbd.txn.urn]
?(HP)HPZTBD[pz,pea,pzT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 tbd.account                 44 URN      L  PBR.ACT        pz                                                      
 tbd.coll.ag                 10 FREE     L  PBR.COL.AG     pea                                                     
 tbd.txn.urn                  5 URN      L                 pzT                                                         
 tbd.status                   1 FREE     L                 ?(HP)HPZTBD[pz,pea,pzT]|0                                   

 Index Files                        Subscripts/Physical Base

 act.type.x                         [acct.type,account]
                                      ?(HP)HPZA[pda,pz]

 activity.x                         [account] = txn.urn
                                      ?(HP)HPZI[pz]

 actnum.x                           [actnum,account]
                                      ?(HP)HPZR[pzR,pz]

 bill.grp.x                         [bill.group,account]
                                      ?(HP)HPZB[pdb,pz]

 claim.number.error.x               [ins.claim.number]
                                      ?(HP)HPZCNB[pzcn]

 claim.number.x                     [ins.claim.number,account,ins.urn]
                                      ?(HP)HPZCN[pzcn,pz,ppi]

 client.x                           [client,account]
                                      ?(HP)HPZK[peb,pz]

 com.rem.x                          [txnt.user,txnt.date,account,txnt.urn]
                                      ?(HP)HPZPCR[gu,pzRD,pz,pzTT]

 dem.epi.mpi.x                      [epi.patient,account,epi.seq]
                                      ?(HP)HPZEU[pu,pz,pze]

 disch.date.x                       [bill.group,hosp.dis.date,account]
                                      ?(HP)HPZC[pdb,pzDDT,pz]

 edi.claim.x                        [account,ins.urn]
                                      ?(HP)HPPE[pz,ppi]

 entry.log.x                        [open.user,open.date,open.type,open.time,account]
                                      ?(HP)HPZETY[gu,pzdt,pzoty,pztm,pz]

 epi.ins.policy.x                   [epi.ins.policy.number,account,epi.ins,epi.seq]
                                      ?(HP)HPZEIP[pzEIP,pz,pdi,pze]

 fam.acct.x                         [rp.name,family,actnum,account] = rp.seq.no
                                      ?(HP)HPZFA[pzPM,pv,pzR,pz]

 famnum.x                           [famnum,account]
                                      ?(HP)HPZF[pvR,pz]

 gname.x                            [rp.name,account] = rp.seq.no
                                      ?(HP)HPZG[pzPM,pz]

 guar.soc.sec.x                     [guar.ssn,account]
                                      ?(HP)HPZGS[pzGS,pz]

 hold.acct.x                        [hold.reason,account]
                                      ?(HP)HPZHA[peh,pz]

 hold.epi.x                         [epi.hold.reason,account,epi.seq]
                                      ?(HP)HPZHE[peh,pz,pze]

 ins.policy.x                       [ins.policy.number,account,ins]
                                      ?(HP)HPZIP[pzIP,pz,pdi]

 me.doc.loc.x                       [temp.db.lvl.a,temp.db.lvl.b,txn.doctor,txn.location,me.acct.type,sort.name,acco
                                      ?(HP)HPZMR[pdo,pdg,pdd,pdl,pda,pzN,pz]

 mpi.x                              [patnum,account]
                                      ?(HP)HPZU[puR,pz]

 mt.actnum.x                        [epi.mt.actnum,account,epi.seq]
                                      ?(HP)HPZMA[pzma,pz,pze]

 mt.admurn.x                        [mt.adm.urn,account]
                                      ?(HP)HPZMU[aa,pz]

 name.x                             [sort.name,account]
                                      ?(HP)HPZN[pzN,pz]

 phone.other.x                      [home.phone,account]
                                      ?(HP)HPZPO[pzPH,pz]

 phone.seven.x                      [home.phone,account]
                                      ?(HP)HPZPS[pzPH,pz]

 phone.ten.x                        [home.phone,account]
                                      ?(HP)HPZPT[pzPH,pz]

 phone.x                            [home.phone,account]
                                      ?(HP)HPZP[pzPH,pz]

 reminder.x                         [txnt.reminder.for.user,txnt.reminder.date,account,txnt.urn]
                                      ?(HP)HPZPR[gu,pzRD,pz,pzTT]

 report.ins.aging.x                 [temp.db.lvl.a,temp.db.lvl.b,me.doctor,me.location,mei.ins,sort.name,account]
                                      ?(HP)HPZRA[pdo,pdg,pdd,pdl,pdi,pzN,pz]

 rpt.hold.by.coll.x                 [collect1,sort.name,account]
                                      ?(HP)HPZRH[peo,pzN,pz]

 rpt.ins.age.by.payor.x             [temp.payor,mei.ins,sort.name,account,me.doctor,me.location]
                                      ?(HP)HPZRB[pdy,pdi,pzN,pz,pdd,pdl]

 rpt.txn.diag.x                     [account,txn.urn]
                                      ?(HP)HPZTDX[pz,pzT]

 rpt.txns.ins.x                     [acct.type,sort.name,account,txn.urn]
                                      ?(HP)HPZTXN[pda,pzN,pz,pzT]

 stmt.number.x                      [stmt.number,account,stmt.urn]
                                      ?(HP)HPZSN[pzsn,pz,pps]

 txns.bch.date.x                    [txn.bch.date,account,txn.urn]
                                      ?(HP)HPZTBI[pzBD,pz,pzT]

 txns.hold.index                    [account,txn.urn] = hold
                                      ?(HP)HPZTH[pz,pzT]

 txns.location.x                    [txn.location,account,txn.urn]
                                      ?(HP)HPZXL[pdl,pz,pzT]

 txns.ohcp.x                        [txn.doctor,account,txn.urn]
                                      ?(HP)HPZXO[pdd,pz,pzT]

 txns.procedure.x                   [txn.procedure,account,txn.urn]
                                      ?(HP)HPZXP[pdp,pz,pzT]

 txns.rsp.doc.x                     [txn.doctor,account,txn.urn]
                                      ?(HP)HPZXD[pdd,pz,pzT]

 txns.ser.date.x                    [txn.ser.date,account,txn.urn]
                                      ?(HP)HPZTSD[pzSD,pz,pzT]